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ASSTRACT 


PROGRARNAGLE, REAL-TIME clock: fhe COGIC 7 
ee 


INTERVENTION” CHTTH ONC ONLY ONE faaeer at SIGNALS 


IN INPUTS, IT MUST BE DISCONNECT 


T W Ss THIS PROGRAM WA 
Bee one #0 Bun AEN AN Y poP=1i 7 FBRILY CaRPUTER” IF Tre, USER I 
CnPANTETAR RITH AN LSI-11 HE SHO REVIEW SECTIONS 8 


A SOFTWARE SWITCH REGISTER Is TNGLUOEE WITH THIS PROGRAM. OT eCAN 
BE USED ON AN iSI-11 OR “al U'S THAT HAVE HARDWARE SWITCH 
REGISTERS, SEE SECTION 8.6 


EVERY EFFORT WAS MADE TO MAKE THIS PROGRAM CONFORM TO L35I-11 
ee RESTRICTIONS, HOWEVER; THE USER SHOULD READ secTio NS 


-& AND fe 
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REGUIREMENTS 


EQUIPMENT 


1. POP-11 FAMILY COMPUTER WITH SK OF _MEMORY (OR MORE) AND 170 
FACILITIES (A SWITCH REGISTER OR TTY). 


&. MNCKW UNDER TEST. 


STORAGE 
THIS PROGRA™ OCCUPIES AND USES ONLY THE LOWER 8k OF MEMORY. 
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3.0 LOADING PROCEDURE 


ity) 


mM 


METHOD 

STANDARD PROCEDURE FOR NORMAL BINARY TAPES SHOULD BE FOLLOWED. 
ABSOLUTE LOADER MUST BE IN MEMORY. 

PLACE BINARY TAPE IN READER. 

TYPE ADDRESS #7500 (S* DETERMINE BY LOCATION OF LOADER). 
TYPE “G" (PROGRAM WILL BE LOADED INTO MEMORY). 

THE PROGRAM CAN ALSO BE LOADED BY XXDP, ACT, OR APT. 


&£ ww = 


NON-STANDARD ADDRESS, VECTOR, OR USE OF SOFTWARE SWITCH REGISTER 


THIS opRocRan 1s noet TO TEST A MNCKW WITH A STANDARD ADDRESS AND 

VECT IF OF SE ARE DIFFERENT ON THE MNCKW YOU ARE 
YE ToNG CHANGE V THE CORRESPONBING LOCATION IN MEMORY BEFORE 
STARTING THIS TEST. 


CURRENT 
LOCATION TAG CONTENTS COMMENTS 
1250 SBASE: 170420 ; } BASE eS OF EQUIPMENT 
1244 $VEcTi: 000440 INTERRUPT VECTOR #1 
i7é SSWREG: 000000 nen W 
1157 STPFLG: -BYTE O :“TERMINAL AVAILABLE” 
3; FLAG (BIT<O:7>=0=YES) 
NOTE 
SINCE NO HARDWARE SWITCH REGISTER 
EXISTS, YOU MAY SET ANY BIT_IN “S$SWREG” 
AS YOU'WOULD HAVE SET IT IN THE , 


oOo 


G 


STARTING PROCEDURE 


ee ee ee 


CONTROL SWITCH SETTING 


BEFORE STARTING THE  % tthe SET ALL SWITCH REGISTER 
DESIRED, SEE SECTION S. 


STARTING ADDRESSES 


204 
eid 
E14 
220 
230 
240 
2es0 


START OF LOGIC TEStS 
Restart ee ty +» LOGIC TEST 


ARTING ADDRESS 
ADDRESS 
NG ADDRESS 


PROGRAM AND/OR OPERATOR ACTION 


oo. 


mM 


LOAD PROGRAM INTO MEMORY. 
ENTER KEYBOARD “ODT”. 


LTER 
REGISTER - SEE SECTION S.1. 
3 
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BITS AS 


LOCATION “SWREG” TO REFLECT DESIRED OPTIONS OF A SWITCH 


STARTING ADDRESS, FOLLOWED By “G” TO START PROGRAM. 
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OPERA” ING PROCEDURE 


SWITCH REGISTER FUNCTION 


SWR BIT OCTAL FUNCTION WHEN SET 
is 100000 HALT ON ERROR 
a Co eet 
ie T0000 ENABLE Line FREQ. RATE TESTING 
il 004000 INHIBIT ITERATIONS (SHORT PASS) 
Bare abe eae 
38 alot fel LOOP ON Feet IN SWR «7:0> 


SCOPE LOOPS 


IF _AN ERROR OCCURS AND THE USER WISHES TO SCOPE THE ges 
hee Si OULD BE ALT Ms wD. TO “100000” AT 'y STA Sf on os." 

Tae ae on. ERROR, THEN Wi He PROGRAM eI 5 Ph ant AND THE 
tBu “ODT ee URe ES SHOULD BE ALTERED TO “™ epoco” TO as 
CN CURRENT TEST AND INHIBIT ERROR TYPEOUT, THEN TYPE “P™ 

CONTINUE PROGRAM EXECUTION. 
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PSOGRAM AND- OR OPERATOR ACTION 


LOGIC TESt 


THE FIRST PASS THROUGH THE PROGRAM WILL SE MADE WITH ITERATIONS 
INHIBITED. SUCCESSIVE PASSES WILL ENABLE ITERATIONS IF SWR11=0. 


IF NOT INHIBITED BY APT, THE PROGRAM WILL LOOK FOR MORE KWV11'S 
#0 EXERCISE, ONE PASS WILL EXERCISE ALL MNCKW'S. 


IF FOUR UNItS ARE DETECTED, THE FOLLOWING WILL BE TYPED: 
UNIT s000001 COMPLETED TEStING UNIT #00000e 
UNIT sO00000e COMPLETED TEStING UNIT #000003 
UNIT #900003 COMPLETED TEStING UNIT s000004 
UNIT #000004 COMPLETED 


AT _END OF PASS WHEN ALL UNITS HAVE BEEN TEStED, THE FOLLOWING 
TYPEQUT WILL OCCUR: 


“ENDPASS 12 - TOTAL ERRORS 4 ; THERE ARE 4 (OCTAL) UNITS. 
THE GOOD UNITS ARE ¢ L TO R) QOO0000000001011 
INDICATES THAT THE PROGRAM HAS COMPLETED 


HIS 1 
‘10 DECIMAL) PASSES. DURING THAT TIME 4(OCTAL) ER 
DETECTED. | ALSO WE TESTED 4 UNITS AND THE THIRD UNIT WAS 


+0 
P.] 
w 
a 
p.!] 
m 


HE ONLY 


INHIBITING AUTO-SIZE FEATURE 


THIS PROGRAM WILL AUTOMATICALL y AUTO-SIZE AND TEST EACH MNCKW IT 
DETECTS ON THE SYSTEM. TO INHIBIT THIS FEATURE, SET BIT 15 OF 
LOCATION “SENvM™. ALSO, TO TEST AN INDIVIDUAL MNCKW IN GROUP 

SET tH T pct SECTION 3.2 FOR CMANGING” THE Bast 
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ESRORS 
ERROR PRINTOUT 
PRINTOUT VARIES WITH THE ERROR DETECTED. THE ERROR PC TYPED OUT 
IS THE ACTUAL LOCATION OF THE ERROR CAL 
8 HALT 81 LOCATION  “STYPE"#10 WHEN. RUNNING WITH NO. TERMINAL 
INDICATES EohoR HAS SCCURRED TO FIND OUT THE NUMBER OF THE 
ERROR, EXAMINE LOCATION “STSTNM™.° THIS IS THE ITEM NUMBER. OF THE 
ERROR: FIND OUT WHAT THE ERROR TYPEQUT WOULD HAVE BEEN GOTC 
SOR OnE ERROR POINTER TABLE BESINNING AT LOCATION “ERRTB™ 
.1) EXCMPLE 
IF WE EXAMINED LOCATION “$TSTMN™ AND FOUND A §(101) WE GO TO 
LOCRTION “SERRTB™ AND LOOK THROUGH THE ERROR POINTER TABLE UNTIL 
WE FOUND ITEM 5S. THE INFORMATION WOULD LOOK LIKE: 
:z7TEm & 
EMS ;CLOCK SR DATA ERROR 
a oe 
DFO [ALL NUMBERS ARE TR eSeTAL, FORM 
TEeepeh Me gaQtle gn ttE., -INFORMATION SPECIFIED By OTS 
SERRFC.BSR,SBDADR,SBDADR) FOLLOW THESE STEPS: 
1. LOOK_UP THE ADDRESS OF THE LABEL (1.E., SERRPC) IN THE SYMBOL 
TABLE WHICH FOLLOWS THE LISTING. 
2. #*PUT THI5 ADDRESS IN THE SWITCH REGISTER AND DEPRESS THE LOAD 
ADDRESS SWITCH ON THE PROCESSOR’S CONSOLE. 
3. *NOW DEPRESS THE EXAMINE SWITCH. 
4. $THE DATA DISPLAYED IN THE DATA LIGHTS IS THE . INFORMATZON 
THAT WOULD HAVE BEEN PRINTED FOR HIS LABEL IF YOU HAD A 
INPUT / OUTPUT TERMINAL. 
SEE SE-TI0N 2.4 FOR LSI-11 ODT COMMANDS. 
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NON-STANDARD ERROR HALTS 


SNY HALT IN THE TRAP CATCHER ARER LOCATIONS OO0000-C0i000, 
INDICATES: 
lL. THE MNCKW INTERRUPTED TO A WRONG VECTOR ADDRESS, OR 


TIME-OUT OR ILLEGAL INSTRUCTION HARDWARE TRAP. 
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RESTRICTIONS 


EXTERNAL INPUTS 
ee INPUTS a" AS “SLAVE IN”, “ST1" AND “STe” MUST NOT 
ONNECTED TO R 


BE 
C CT CUSTOMER HARDWARE THAT MIGHT GENERATE THESE 
SIGNALS WHILE THe ‘DIAGNOSTIC IS RUNNING. 


STARTING RESTRICTION 
IF_A FREE im” | CLOCK, SUCH AS 60HZ ono THE POWER SUPPLY, IS 


VEL C70 A 
Bier ihp ULI" ERE ol ohOGe TOMAR Hi REET PHAR oie 
THIS PROGRAM C LINE BY 


FI 
uneron BEVNT 
INHIBITING INTERRUPTS. 


AER sory SC RD EM AE 
A Ne agg MRE Ry Ak Mag a 
I G THE EVENT INTERRUPT 


NHIBITING INTERRUPTS, TO AVOID RECEIVIN 
NG THE ABS LOADER. 


POSSIBLE PROGRAM “BOMBS” 


THE FIRST TWO TESTS OF THIS PROGRAM CHECK TO SEE IF _ THE MNCKW 

RESPONDS TO THE ADDRESS THE PROGRAM THINKS ITS AT. IF THE MNCKW 
DOES NOT RESPOND, A BUS ERROR OCCURS. ALSO BUS ERRORS CAN OCCUR 
hh averen. TIME’ THE PROGRAM SIZES TO SEE HOW MANY KWV11’S ARE ON 


FOR MORE INFORMATION ON THE NEXT SUBJECT, SEE JAN. 1976 (SI-11 
ENGIEERING BULLETIN ISSUED BY THE DIGITAL COMPONENTS GROUP. 


TRAP iS EXECUTED, THEREBY roe eae ROGRAM cone TO tae IN 

THE PROGRAM THAT’ WAS NOT SET UP TO HANDLE THE TRAP IF_ THIS 

este’ THE PROGRAM WILL “BOMB” AND POSSIBLY REWRITE PARTS OF 
LF. 
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MISCELLANEOUS 


POWER FAIL 


AFTER A “oar FAILURE OCCURS, THE PROGRAM EXECUTION WILL CONTINUE 
a i OINT WHERE THE POWER OCCURRED. THE PROGRAM WILL TYPE 


XXDP, ACT, APT 


THE PROGRAM IS CHAINABLE UNDER xXxXOP, ACT AL THOUGH 
“APT HOOKS” HAVE BEEN INSTALLED, THEY HAVE hor? BEEN Tést ED. 


EXECUTION TIME 


G.S MINUTES 


(3 RATION INHIBITED - NO ERRORS 
2.5 MINUTES (15 


H ITERATIONS - NO ERRORS 
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LSI-11 “ODT” COMMANDS 


<CR> RETURN 


<LF> LINE FEED 


t (UPARROW) 
+ (LEFT ARROW) 


a 


SN’ OR RN. 


R;G OR RG 
NL 


7P OR P 
RUBOUT 


DESCRIPTION 


i ata LOCATION AND ACCEPT NEXT 


CLOSE CURRENT LOCATION; OPEN NEXT SEQUENTIAL 
LOCATION. 


OPEN PREVIOUS LOCATION. 


TAKE CONTENTS OF OPENED LOCATION 
CONTENTS OF PC, AND OPEN THAT LOCAT 


TAKE CONTENTS OF OPENED LOCATION AS ABSOLUTE 
ADDRESS AND OPEN THAT LOCATION. 


OPEN THE WORD AT LOATION R. 
REOPEN THE LAST LOCATION. 


OPEN GENERAL REGISTER N(O-7) OR 
S(PS REGISTER). 


GOTO LOCATION R AND START PROGRAM. 


EXECUTE BOOTSTRAP LOADER USING N AS DEVICE 
CSR. CONSOLE DEViCE IS 177560. 


PROCEED WITH PROGRAM EXECUTION. 


ERASES PREVIOUS NUMERIC CHARACTER. RESPONSE 
IS A BACKSLASH (\). 


eo mee BY 


ENTERING LSI-11 “ODT” 


THE HALT OR ODT MICROCODE STATE OF THE KDIIF Se 11 MODULE) CAN 
BE ENTERED IN tates DIFFERENT WAYS (OTHERS ARE A SUBSET OF THESE? 


FROM THE RUN STA 


1. EXECUTION OF A LSI-11 HALT INSTRUCTION, 


£ WwW wv 


A DOUBLE BUS ERROR, 
AS A POWER UP OPTION, 
ASCII BREAK WITH DLV11 FRAMING ens ASSERTING THE 8B HALT 


LINE (ENABLED BY JUMPER OF DLV11) 


UPON ENTERING THE HALT STATE THE KDIIF RESPONDS THROUGH THE SET 
OF COMMANDS LISTED IN SECTION 6 


SES 0013 
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8.6 USE OF PROGRAM SOFTWARE SWR 
THE PROGRAM SOFTWARE SWITCH REGISTER IS ENABLED IF 
1. NO HARDWARE SWR EXISTS; 
2. IF YOU START WITH ALL ONES (SWR=177777) IN ‘HE SWITCH 


REGISTER. 
THE SOFTWARE SWITCH Tt Mi MAY BE ao BY Nad Ne tG (CONTROL 
AND LETTER G KEYS TYPED SERS, Wee cue WHEN ¢tG IS TYPED, THE 


RESPONDS BY TYPING “SWR=XXXXXx" WHERE XXXXXX EQUALS’ THE 
FORMER CONTENTS OF THE SWITCH REGISTER. 
IF YOU WISH TO KEEP THE CURRENT VALUE, TYPE <CR>. IF YOU WISH TO 
CHANGE THE VALUE, TYPE THE NEW VALUE FOLLOWED BY A <CR>. 


Is en TO NOTE THAT THE DIAGNOSTIC IS NOT RUNNING AFTER 
*G UNTIL A <CR> IS TYPED. 


IT 
THE 
8.7 SPECIAL I/0 SIGNAL TESTS 


THREE TESTS WERE INCLUDED TO ENABLE CHECKOUT OF 170 atch 
T T LOCK OED bee THESE TESTS HAVE A SPECIAL 


stl, S 
STARTING ADDRESS. =PRSSES ARE DIATE, NO “END OF 
PASS” MESSAGE IS ee ech tiior™ RRORS ARE R REPOR TED BY Y' TYPING OUT THE 
PC WHERE THE ERROR per cre TED. START THE PR 
REMAINS IN A LOOP GENERA BN DETECTING THE SPECIFIED SsToNaS. 
HALT ON ERROR AND PANTBTT. ERROR TYPEOUT OPTIONS MAY BE USED. 


LOGIC TES: MUST HAVE ALREADY BEEN RUN ON THE MNCKW. 


8.7.1 I70 SIGNAL TEST #1 ST1 IN, ST2 OUT 
SWITCH PACK S2@ MUST BE SET UP AS FOLLOWS: 
SWITCH STATE 


1 OFF 
ON 
3 OFF 
4 OFF 
Ss ON 
6 ON 
7 NOT USED 


THE FOLLOWING JUMFER MUST BE INSTALLED. 
Ji-SS (ST2@ OUT) TO Ji-vv¥ (ST1 IN) 
LORD AND START THE PROGRAM AT 210. 


@.7.2 1-0 SIGNAL TEST #2 CLOCK OVERFLOW TEST 
SWITCH PACK S2 MUST BE SET UP AS FOLLOWS: 
SWITCH STATE 


NOM Swe 


THE FOLLOWING JUMPER MUST BE INSTALLED. 
Ji-RR (CLOCK OVERFLOW) TO J1-TT (ST2 IN) 
LORD AND START AT LOCATION 214. 


I/O SIGNAL TEST #3 ST1 OUT AND ST2 IN 
SWITCH PACK S2 MUST BE SET UP AS FOLLOWS: 
SWITCH STATE 


THE FOLLOWING JUMPER MUST BE INSTALLED: 
Ji-UU (ST1 OUT) TO J1I-TT (ST2 IN) 
LOAD AND START AT LOCATION 220. 
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PRODUCTION STARTING ADDRESS 


A SPECIAL STARTING ADDRESS HAS BEEN PROVIDED FOR_ If'-HOUSE 
PRODUCTION TO USE TO START THE LOGIC DIAGNOSTIC AND INFORM THE 
TESt THAT PRODUCTION IS USING IT. 


Ae a IL: a COcRRORESTE ARE" E ATED "RF 8G a? 1 BARBER! “He 


ONLY AUTO-SIZE UP T 


IN HOUSE war Lon ae WISH ya EXERCISE UP T 16 MNCKW'S ONE 
TIME OC TES iB roe BE STARTED AT LOCATION 230 ANC THE 
PROGRAM WEL 0 SI TO 16 BFINeKWN" Ss. 


TESTOR STARTING ADDRESS 


SoSPHSISS ARTMHLE"E,SOOTEEE ABS PEER EMC SOE PAGERS YEAYS ie 
CLOCK MODULE IS CARL 5 TOPaN IN-HOUSE +P576R. " 


MANUAL nn fee Is si}! IN THIS we OF TESTING. 


THE 
ip on THE a TMOBULE TO OF ben" YeriONS og? C aa SHOULD, N NSE 


ON CLOCK MODULE) SHOULD BE ON, ALL OTHER SWITCHES ON Se 
SHOULD BE OFF 


DWARF STARTING ADDRESS 


MORE COMPLETE TESTING OF te CLOCKS I70 SIGNALS CAN BE _MADE IF A 
DWARF MODULE IS CONNECTED TO tHE CLOCK. IF YOU DO THIS, START 
THE DWARF'S STARTING ADDRESS. 

A SERIES OF INSTRUCTIONS WILL BE TYPED OUT FOR YOU TO FOLLOW. 
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-NLIST MC,MD,CNO 
ME 


[LIST 
 ENABL ABS 
-ENABL AMA 
"MCALL .HEADER, .SETUP,.SETTRAP,.TRMTRP, .STRAP,.SRDOCT, .STYPBIN 
RESLE THBOES. BERR Searce: FTVBDeo. $oesve. aneass 
M e. 
*M act ‘Seer RAR. RRIYE, STV? 
SSWR= 
. TITLE. _MAINDEC-11-DVMNC-A 
bids ces a7 
T CORP. 
SAVARD eORsS. 01754 
! SPROGRAM BY EDWARD C. BADGER 
i STHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
j PACKAGE (MAINDEC-11-DZQAC-C2), SEPT 14, 1976. 
éTne1 
-SBTTL OPERATIONAL SWITCH SETTINGS 
tS SWITCH USE 
Bm ee ee 
:* 1S HALT ON ERROR 
:* 14 LOOP ON TEST 
:* 13 INHIBIT ERROR TYPEOUTS 
:# 11 INHIBIT ITERATIONS 
.* 
tS 18 PEbB SN ERR 
* € LOOP ON TESt IN SWR<7:0 
.SBTTL TRAP CATCHER 
.20 
; #ALL UNUSED LOCATIONS FROM 4-776 CONTAIN A ™. +2" 
;#AND “JSR RO" SEQUENCE TO CATCH ILLEGAL INTERRUPTS. 
> #AND INTERR RRUPTS TO THE WRONG VECTOR. 
>#LOCATION 0 CONTAINS A O TO CATCH IMPROPERLY LOADED 
; FVECTORS. 
“HOR 1OTRD, 200 ;HANDLE BUSS ERROR. 
= 
DISPREG: .WORD -SOFTWARE DISPLAY REGISTER. 
SWREG: .WORD 0 »:SOFTWARE SWITCH REGISTER. 


-=190 
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DVMNCA.P1Li TRAP CATCHER 
55 000100 900104 o9DD200 
5? 

Se 

59 900200 a 
66 000200 000137 001534 
61 o0es204 000137 O02162 
< 

63 D002 

64 9000230 selebiees 001514 
6S 000240 

bg 000240 990137 001474 
b8 o002S0 900137 901454 
79 

Ti 

ve 

73 

v4 

7S 

7E 001190 

7c 

78 

80 

Si 000 

Be 000012 

83 000015 

cu 000200 

gs 177776 

96 

a? 177774 

86 177772 

Ss 177570 

30 177570 

31 

32 

33 oo 

35 000001 

3s oo 

3& 000003 

37 ooo004 

98 000005 

33 00 

106 000007 

101 090006 

102 000067 

103 

id4 

10s coo0000 

106 000046 

107 000100 

10e 600140 
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.WORD 104,200,2 :IF “B EVENT“ON Q-BUS IS 
!CONNECTED,WE NEED @ WAY OF 
L IGNORING {7S INTERRUPTS. 

.=200 

IMP aaSTART 

IMP DaRSTART 

SHB” aewsTART :WESTFIELD STARTING ADDRES: 

.=240 

IMP aaTSTSTR ;ALL TESTER TEStS 

IMP DeDWARFT 


; TEST past WITH OWARF MODULE. 
:1F STARTED HERE. 

SALLOWS PRODUCTIC.i TO EXERCISE 
:UP TO 16 CLOCKS. NORMAL=4. 
.SBTTL BASIC DEFINITIONS 


a A ae —- OF THE STACK POINTER ### 1100 ### 


ae : BGELE BEFINHTION 9F ESGRE et 


“E8u tV C6 E COPE CALL 
eenaeen —— se 


HT 1 i TEOBE FoR FOR QR HORIZONTAL TaB 
= - 13€0 CARRIAGE RETUR 
CRLF= 200 ;;CODE FOR CAR RIAGE RETURN- -LINE FEED 
Wie ay 177776 ;:PROCESSOR STATUS WORD 
STKLMT= 177774 ;;STACK LIMIT REG 
pinae 1200¢e HPAGERed TatemmuPt REQUEST REGISTER 
DDISP= 177570 : HARDWARE DISPLAY REGISTER 
jXGENERAL PURPOSE REGIST Phe ae detster 
R= a 33 NERAL GISTER 
. % 33 RAL 
R3= “3 : GENERAL REGISTER 
R4= “4 ;;GENERAL REGISTER 
RS= “4S ii Ge RAL REGTSTER 
R6= %6 33 RAL REGISTER 
R7= %?7 ;; GENERAL REGISTER 
SP= “6 ;;STACK POINTER 
PC= “7 ::PROGRAM COUNTER 
pePRIORI Ty LEVEL DEFINITIONS ay ns a 
PRi= 40 !IPRIORITY LEVEL 1 
PRe= 100 ::PRIORITY LEVEL 2 
PRa= 140 ::PRIORITY LEVEL 3 
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i} 27'654) 
TONS 


MACY 


BASIC DEFINI 


-DVMNC-A 


ob} Bd 
WWJ LJ - 
>>>> ww w 
WW = - 
Reb i di 
~ ~ 
>>>> & a 
ere bs 
Ce ee all oO 
acean + - 
Qo000 & 
ee mee tT oO 
@waaac a oO 
aaaaqa - 
torecese ~ 
serecere CD q@ 
| oa ~ 
~~ 
=z w 
w -_ 
Oo 
2 = 
a oa om w 
J Loa] b- bbb 
ant 7352 rmu- z 10-49-44 
w be aaa ~ anonm 
—O NUWMW w uO oe 
oo000 see ee we ew oe WR Wor. o 
wOOO0000 o mtu-7 O000000 OoO000 
0000 TOOOQO0O0O0O000 g RESSVVVVee Herb 
oyOory OOnDOOOOR000000 - o00 O0000 40-4b-a0-4 
uum FF ATF TFs wu wn nee ST Os ee 
— 
~ >>>>>>>>>7> Cunnnnnnnnnnnnnnun>>>> 
Ze Oe 8 0 000-400-0000 eee en SESS SEZ ONS roto t ote 
HHH NMNTMU<OC Or OWTMU-ODD3DID3D390302059059 AA OOO O000372372 
Twwr SEE ee ee een ao dn kn 5” batterhert arte tert erfert er bb b—- -  -  - OO00 
CCcee@ * 3333333333332 pa TUTE SPY ee ev et oe lenlenlenlanlenlenbenienlenlenienienbenienn 1) 
aaao "MUNIN NMMNUIMUIMWIUIUD +» «+ 2 ee es -MOODODOOOOMOOOOOOH 
oOo000 SBQOBSQReeoeoz Ns SRsegesesessseozys 
Ooryory oOo000000 OoOrVvV-3000 o000 oo007TuU-000 
UUMM Fe ne OT NA RRO Re SBSSsheotosSSs555 
6098 Sru-o500000008000 siditetetetelatetstet=tetetats 
oO000 mFS tetatatatstatatatetatetatsy eft tetatatetetstetstatst=tets) 


CO-UM TNO. OMO-UMTWWl- OMO@UM TM Ol-DOVO-uUMT PPh BOO DT 1h Ot BOY 
Ott tt tt tet YUU UUMUMUUMMMOMMOMMMMMOTTIITIIITIVMUNMNNMMNMOww 


hk dk kk EE kk kd EE kk kd dd nd nd rd nd nd ad dk nd nk Ok nd nd nd oh nd ad ed Od ed ed ed Od od ond ded ented 


j 
5; 


oO 
< 


—OWOONICW LWh-OWOONITW LW D 


eee odd DDD D DSDSOOSSDMMD 11-13-19 -0-2-8 9 TOOT OP 3 
w fie] DOOMOY I IIN IIDC PTCKTCTeEry O 
Ppa Mt tet eit cat ath pra at a $. 


Wh-OwWON 


204 


299 


noronororonir 
bb bh Re 
mn scWwrre-O 


wt 


he 


OO004E 
ocsose 


9000e4 
900044 


poe MACY 
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167400 
000001 
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.EQUIY BITOS,BITS 
“EQUIV BITOY;BITY 
-EQUIV BITO3,BIT3 
-EQUIV BITO2,BITe 
-EQUIV BITO1,B1T1 
“EQUIV BITOO'BITO 
-#BASIC “CFU TRAP VECTOR ADDRESSES 
ERRVEC= 4 ;; TIME OUT AND OTHER ERRORS 
RESVEC= 10 !!RESERVED AND ILLEGAL INSTRUCTIONS 
TBITVEC=14 ::°T" BIT 
TRIVEC= 14 +: TRACE 
TVECs 4 !: BREAKPOINT TRAP (SPT) 
IOTVEC= 20 ;; INPUT/OUTPUT TRAP ‘IOT) #*SCOPE s+ 
PHRVEC= 24 33 R FAIL 
EMTVEC= 30 !}EMULATOR TRAP (EMT) ##ERROR## 
TRAPVEC=34 ::"TRAP™ TRAP 
TKVEC= 60 :;TTY KEYBOARD VECTOR 
TPVEC PRINTE 


= y 33 VEC tO 
PIRQVEC=240 ;;PROGRAM INTERRUPT REQUEST VECTOR 


ABASE= 1790420 
AVECTI= 44O 
APRIOR= 200 


SSWR= 1674090 
$TN= 1 


-SBTTL ACT11 HOOKS 


4 SEKAASKKASSHAARARESA FASS SAFSSSSSSSSSSSEELFSLSSSAESSSSSREFFHSHFSS SD 
: HOOKS REQUIRED BY ACTL1 
=. 


vec ;SAVE PC 
= 

SENOAD :;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SE0p 
"WORD O 5;2)SET LOC.S2 TO ZERO 

* =$SVPC I RESTORE PC 


251000 
.-SBTTL APT PARAMETER BLOCK 


$2 THSSASSKSSKHFKSKAARAKFRAKAHKAAHKAAAKAAEKHFFRHKSSSSLEFAETRESLFLHS 
:SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
33 SESFELHKEAEFKSKASSKKFKKKASSEKRSSKREKAKSAKKSFKSSASSHSASASRHAFLAAS HS 
.$X=.  ;;SAVE CURRENT LOCATION 
* 224 ;;5ET POWER FAIL TO pOINT TO START OF PROGRAM 


200 33 APT ST 
.=44 ;;POINT TO APT INDIRECT spores PNTR. 


.=.$X ss 
gz SERRERESEREE EERE SEE EEERESEEEREEEEEEEEEEERERES EES ER EEE ER ERS FSFE 
:SETUP APT PARAMETER BLOCK AS DEFiNED IN THE APT-PDP11 DIAGNOSTIC 


SEG C022 


23 

s 

rururururureny 22 
m 
oO 
vr 


furufufueee © 
ar 


Wwr-Ow0O~ D 
888ee8 = 


oo 
oo 


KOe 
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APT PARAMETER BLOCK 


SAPTHD: 


000000 $HIBTS: .WORD O :;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
001174 S$MBADR: .WORD $MAIL ;:;ADDRESS OF APT MAILBOX (BITS 0-15) 
oo0002 $TSTM: .WORD 2 ::RUN TIM OF LONGEST TEST 

000176 S$PASTM: .WORD 120. :;RUN TIME IN SECS. OF 1ST PASS ON 1 _UN 
000170 SUNITM: .WORD 120. : SADDITIONAL RUN TIME (SECS) OF A PASS 
000031 "WORD $ETEND-SMAIL7’2 ;;LENGTH MAILBOX-ETABLE‘WORDS ) 


OVMNC 





So Mee SP | Mata ~ 


8 


TT a TT ey ee ee ee 
es ae ee be ee ee Be ee ae fe an Be be be Be Be Be fe fe ae Pe ae ae ee Pe Be fe bs oe 
NOOEVONTUL VOT UOT LENORE VOOM EVO LOCOS 


CC) 
AO 


88888888 


S888888888888888sssesss 


MACY1Li 


COMMON TAGS 


001100 





000377 


LOe2 
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.SBTTL COMMON TAGS 


jeucgtevonguevcnsvestuccoeentesocesterrerss reste nen 
:ATHIS {OLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 


HE PROGRAM 
-=1100 
SCMTAG: on ;;START OF COMMON TAGS 
$TStNM: -BYT 8 ; CONTAINS THE TEST NUMBER 
FONT 7 WOR 8 :IEONTAING EF CEfesté tFerATION COUNT 
PADR: .WORD 0 :: CONTAINS LOOP ADOR ESS 
SLP RR: .WOR 0 :;CONTA 5 TURN FOR ERRORS 
R Th: WORD 0 : ;CONTA AL _ERRORS DETECTED 
SITEMB: .BYTE OO :;CONTA ITEM CONT ; 
SERMAX: .BYTE 1 :;CONTAINS MAX. ERRORS PER TEST 
RRPC: .WORD 0 :;CONTA T ERROR INSTRUCTION 
: .WORD O :;CONTA $ *GO0D’ DATA 
: .WORD O 33 TA *BAD’ DATA 
$GODAT: :-WORD O :;CONTA , * DATA 
T: .WORD O ;; CONTA . * DATA 
. WORD 8 :;RESERVED--NOT TO BE USED 
TOB: BFE ;;AUTOMATIC MODE INDICATOR 
SINTAG: .BYT 8 $; INTERRUPT MODE INDICATOR 
SWR tt SS OF Brarcn REGISTER 
DISPLAY: . DDIsP i ADDRES DISPLAY REGISTER 
STKS: 177560 s7 ITY K ver 
STKB: 177562 iy FER 
TPS: 177564 iT R STA Tus RE REG. ADDRESS 
Ley] ior 6 s3T R * M eae ‘te 
Srvc: ‘ vie - ae PILCER th HARACTE S S RequiRED 
rae G: :BYTE O aTERMINAL BvaiLa Lem "FLAG Fat (67> =0=YES) 
STIMES: O R OFS ITERATIONS 
SESCAPE : 0 ae RROR ABDRESS 
LL: .ASCIZ <¢207><377><377> 
QUES: ASCII 497 
CRLF: :ASC «15> AGE RETURN 
ASCIZ <1l2> 


Fei ASCEZ, C12e TILING FEED nn eeeegees 
‘SSTTL APT MAILBOX-ETABLE 


= > ic cma emanate ntti ts i teh 


SMAIL: ;;APT MAILBOX 
SMSGTY: .WORD AMSGTY ;;MESS TYPE CODE, 


SEG 


coe 


MO0e 
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DVMnCA.P11 APT MAILBOX-ETABLE | SEG OGeS 
378 BBtS98 868888 Srscnd: HGR AriSGnO HIReSSMGE ADDRESS 
se 4 
OBS ae Ee ae ee, Tete at a 
es ORIEIe goobo0 Surge: “Hon BSunEC an ate fe r 
296 001222 000000 SCPUOP: .WORD  ACPUOP ‘is 4 ary 236 Pe 
8 te 201, “icoseoe, 11/20=03, 11/46=04, 11/45=05 
Qi : cat E airce 
331 # Bt § T Ae PSTN T PROCESSOR 
RR Fra FE RL A ae 
535 POL =002 
298 : # pee 
299 001226 o00000 $MADRI: .WORD AMADRI ;;HIGH i = 
306 - # M. ae. a es WORD AND LOW OF “TYPE” ABOVE 
301 001230 000 $nans : .BYT aries 3; HIGH 
001231 000 T : YT AMT 3; MEM. K 
oi piss Gag ie ee] decays EE 
305 poise 0 snares: BYTE AMT 33;MEM.T kk3" 
306 001236 o00000 SMADR3: . AMADR3 “LAST: SS, BLKs3 
307 001240 000 4: -BYT 4 iH GH SS,M.S.8YTE 
333 pales res he me i EY fishes 
317 Borsue oo SVECT AVEC TS Hs TERRUPT. VE Tones BUS PRIORI Ty 
312 O01eS0 170420 RO ABASE ;; SS OF EQUIPMENT UNDER TEST 
313 001252 SOE vin WOR’ ADE VM {Device 
314 Oo1DS4 0000 COW! WOR ACOWL :C LLER DESCRIPTION WORDS! 
| Fees sre? 


NOe 
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“Plt ERROR POINTER TABLE SEG 0026 


.SBTTL ERROR POINTER TABLE 


;*THIS rons Conrains THE de gl FOR EACH ERROR THAT CAN OCCUR. 


ION 
"THE INFORMATION IS OBTAINED USING THE INDEX X NUMBER FOUND IN 
i #LOCATION SITEME. THIS mQUMBER Ingie ATES meadow 11 ITEM IN N THE TAGLE I IS PERTINENT. 
ENOTES: bach f rece is oue FABLE CONTAIN 4 pAINTERS Ex EXPLAINED AS FOLLOWS: 
;# M ;;POINTS TO T ERROR MESSAGE 
ag PBI 18 1 Baie weir 
;* 3 
;# OF :;POINTS TO THE BATA FORMAT 
001256 SERRTB: 
ITEM 1 
0012 7 M ; CLOCK R FUNCTION ERROR 
og ise8 BBE aay i ERREC BeR 7’ 
O0le62 Oell4e2 OT1 s SERAEC ASR, SBDDAT , SGDDAT 
00i264 021236 OFO L NUMBERS ARE IN OCTAL FORM 
; ITEM 2 
opis Senet: ete |EARBE _Sg,087" BaEOR 
001272 Oell4e OT1 aig 7 ASR, SBDDAT, SGDDAT 
001274 021236 DFO L NUMBERS ARE IN OCTAL FORM 
; ITEM 3 
soiase Sees eng a 
001302 021154 ora : SERRPC, ABR $B00AT $GDDAT 
001304 021236 OF [ALL NUMBERS ARE IN OCTAL FORM 
: ITEM 4 
001306 o20400 EM4 ; INTERRUPT ERROR. 
Dosis oeT tee he SEanéc TRIO, TRER 
001314 O21236 0 L PPC aces ane "IN 0, TRERO FORM 
: ITEM Ss 
Spree geaees Eve ERReX SA See €PE06 
001322 Oeii4e2 DT] SERREC, AER. SBDDAT, $300A7 


oe! Says et alae 


Er pete bvty} 
Bato 


eT Eb betta 


WWW 
wo 


aera 
SS8e 


ESSESLESESELSESSSELEL EE EELS 
POMC OOO NTN LUN ODDIE LOU Ow Ie LD 
ass 8888888 8888 
ee ee 
Sf £LLSLCIW ety 

R2RSe znd 


Vee me 
oor WO 





02 le36 


167774 
167772 
179430 





MALY11_ 27(6S4) 
ERROR POINTER TABLE 


: ITEM 


; ITEM 


; ITEM 


; ITEM 


; ITEM 


DFO 
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ABASE 
ett 


AVECT 
AVECTL +2 
AVECT1+4 
AVECT1+6 
APRIOR 
167774 


167772 
170430 


;ALL NUMBERS ARE IN OCTAL FORM 


fr FUNCTION ERROR 


PALL SUMBERS ARE IN OCTAL FORM 


ell ERROR 
FALL NUMBERS ARE IN OCTAL FORM 
REPEATABILITY ERROR 
ASR OD CNT 


ASR, SBODAT 


T CNT 7aee CNT 
ALL RAUMBERS ARE IN OCTAL FORM 


COUNT ERROR 
ASR WAS 


Seng ACR, 0 
L NUMBERS ARE IN Ty Far FORM 


i ERRee oeeuoer AGOR. 


S$TMPO 
FALL NUMBERS ARE IN OCTAL FORM 


; VECTOR ADDR. OF STe INTRS. 


;ADR. OF TESTOR CLOCK 


CO3 
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DVMNCA.P11 ERROR POINTER TABLE SEG 0028 
TSCLO: .WOR 70432 ; BUFFER PRESET REG. 
at STMPD: 7 WOR 2 TEMP STORAGE. 
snp: - WORD = TMP STORAGE. 
ROTATE: .WOR 0 sPOINT TO DEVICE UNDER TEST. 
ST: :HORD : KEEPS. E Tack K OF GOOD UNITS. 
ERCNT: .WOR 
St: Hoe 8 rae Bic 
Ng ‘  HORB 5 =0 PEN ° BE. Te Restor START, BY L*S 32 

SORE WORD 5 Oisatt DABRE. MODULE PRESENT (21, YES? 
ASK: ‘WORD O 1 WHEN QUESTION ASKED IN R 
DWARF T= 

441 0014S4 37 001450 DWARF ; INDICATE DWARF TESTS. 

442 001460 005237 001444 INC EXS PLUS REST OF TES(tS. 

443 001464 012737 OO0004 o01442 MOV #4, TSTCNT MAX TO BE TESTED. 

444 001472 000427 BR 1§ 

44S 001474 TSTSTR=. 

446 001474 37 001444 INC ;SET FOR TESTOR. 

447 001500 0014sS0 CLR DWARF 

448 001504 012737 OO0020 001442 MOV #16.,TSTCNT ;ALLOW 16 UNITS 

449 001512 000417 R i$ 

4 0015 4 WSTART=. 

451 001514 7 000020 001442 MOV #16. ,TSTCNT :TEST UP TO 16 UNITS. 

452 001522 0014S0 CLR DWARF 

453 001526 005037 001444 CLR EXS 

454 001532 BR i$ 

45S 1534 START=. 

456 001534 012737 OO0004 o01442 MOV #4, TSTCNT ;TEST UP TO FOUR UNITS. 

457 001542 005037 001450 CLR DUA WArF 

4S8 001546 005037 001444 CLR 

459 001552 1S: 

“et SELEin HRE"EGRABE TEs °CBCatAgS bn 

462 O0015S2 012706 001100 a MOV eSCMT nts, re sFEIRST LOCATION TO BE CLEARED 

463 001556 O0S026 CLR (R6)+ ::CLEAR MEMORY LOCATION 

464 001560 O22706 001140 CMP % * Rb ; ;DONE? 

465 001564 001374 BNE ;;LOOP_BACK IF NO 

466 001566 012706 001100 Steck, SP ;:SETUP THE STACK POINTER 

m +4 001572 012737 016066 o00020 ss INITIALIZE ° red a Herve” j 107 VECTOR FOR SCOPE ROUTINE 

469 001600 Ot 37 Dee HOV a3u0, gatotve T sit 

470 001606 o 737 ened 900030 mov sen a © itEves EMEC VECTOR FOR ERROR ROUTINE 

+ 4 

47, D0 bee O1e737 onal bo0034 MOV i TBAS er tray VECTOR FOR TRAP CALLS 

473 O01 12737 6 MOV ab ats iste, 

474 001636 012737 017654 O000e4 MOV ey S POLER FAILURE VECTOR 

475 001644 016737 000 000026 MOV SPURVEC YS” ORY tad 

476 O016S2 037 OO11 CLR — NUMBER OF ITERATIONS 

477 001656 005037 001162 CLR Ses ee AL t2 ESCAPE ON ERROR ADORESS 

478 OOl662 112737 OOO0Ol o01115 MOVB SCE RHIAX CLEAR ONE ERROR PER TEST 


DO3 
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Pl INITIALIZE THE COMMON TAGS 


1S BRIERE. BBLHY rRLPERR  HTASTAE Haat POR ORSEEESTO® $e 
bite pst Seed Tae meta 
Wee FOES SONS 


eens) SecRR + eye VECTOR 
SOSHA SHR i} SETUP FoR A HAROWARE SWICH REGISTEF 
RDOISE DISPLAY ; AND 


; 6 HARDEE i STER 
ORR ANCH A IF NO Noe Roe Hao od Snes 


65$ fe Aas 
#6SS, (SP) :SET UP FOR TRAP RETURN 


001140 : SSWREG, SWR . Pomnt TO SOFTWARE SWR 
001142 epi Sen G, DISPLAY 
: (SP)+,ad8ERRVEC ;;RESTORE ERROR VECTOR 


RV 
SPASS ;CLEAR PASS COUNT 
ooieis | acne) iH TEST utetho AES Ma Le APT 


6 SW 
001140 #SSWREG, SWR NO, Suse APT SWITCH REGISTER 


88 888888 


ate 


J SeKe26 Sees? 


8 88 


000340 #340,-(SP) fd CPU PRIORITY ON RETERN. 


002026 #68$,-(SP) My Ye ADORESS. 
: AUSE A RETURN(PUTS STATUS IN STATUS REG.). 


;ZERO_DEViCE COUNT. 
Haan ;FIX TRAP CATCHER. 
H 4 


RRVEC+2 
;NOW FIX VECTOR ADDR. 
001376 gyi! ;FIX ADDRESS OF CSR. 


;RUNNIGN UNDER APT, XxDP? 
177777 ;ONLY TYPE ON 1ST START UP 
021015 


g 
: 


TYPE, 
.SBTTL _TYPE PROGRAM NAME 
;: TYPE 1 NAME OF THE PROGRAM IF Priest PASS 
177777 #-1 ;;FIRST i 


BNE oF. ii ANCH IF 

002156 YPE YPE Bsciz" O TRING 

.SBTTL GET v veut’ FOR SOFTWARE shiTcH RE REGISTER 

oo0042 rst oe de AR WE R N NG UNDER XXDP/ACT? 
001214 oo0001 SERV, #2 SARE WE RUNNING UNDER APT? 


BEG BRANCH I : 
001140 000176 SWR, #SWREG i SOF THARE SWITCH REG SELECTED’ 
BNE 728 c 
104406 !iGET SOFT-SWR SETTINGS 


Rekhie feck 





E03 
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72s 
#1, $AUTOB ;;SET AUTO-MODE INDICATOR 


693 ;;GET OVER THE ASCIZ 
“CRLF > #@a<CRLF> 


ASK 
EXxS : TESTOR MODE ENABLED?” 
1$ NO DON’T TYPE NEXT MESSAGE. 
6S$ : TYPE ASCIZ STRING 
4g ‘GET OVER THE ASCIZ 
C18><12>eTESTOR MADE ENABLED--# 
67S ss TYPE ASCIZ STRING 
6$ : GE OVER THE ASCIZ 
¢15><12>8TEST RUNAING. . 
MDEVCT ; TESTING FIRST UNIt. 
ERCNT :NO ERRORS 
P :NO_ PASSES. 
ATE ‘POINT TO FIRST UNIT. 


#1,ROT 
ROTATE, UTEST 
;COME HERE FOR NEXT UNIT,OR END FASS. 


;CLEAR OUT PRIORITY BITS. 
;NOW FIX VECTOR +2 ADOR. 


sLGTS FIx ST2 Me Ph ADDR. 
:I1TS 4 GREATER a THE 1ST. 
:VECTOR +2 ADDR 


#179000 VECT1 
vECT vECTP 


#2 ve TP 
veeT1. VECT2 
#4, VECT 
vette. VECT2P 
a2, VecToP 


ASR, ABR 
#2, ABR 


+D 


— OF PRESET REG= 


pepegeqeuonenernerer ey were tt a ain tae CCC 


#TEST THE ADDRESSABILITY OF CLOCK CSR 


+ SEFFESEESSSEEEEREREREREEKERHSRE RRA LAK RASRAREEERERRERKRE EEE ES ES 
g Ni 


MAINDEC-11-DVMNC-A 11 27(654) 
DVMnCA.P11 GET VALUE FOR SOFTWARE SWITCH REGISTER 
533 002144 900403 BR 
534 O0e146 112737 000001 001134 71$: MOVB 
53S O0ciS4 7e$: 
536 002154 o00402 BR 
537 --70$: .ASCIZ 
538 002162 64s: 
539 O0elbe RSTART: 
540 OOelbe 005037 9014Se2 CLR 
S41 902166 005737 001444 TST 
S42 0021 001417 BEQ 
543 002174 104401 o0220e TYPE 
544 002200 000414 BR 
54s -:65$: .ASCIZ 
S46 002232 64S: 
547 O02e32 1$: 
548 O0ee3se 104401 oo02240 TYPE 
549 0022 000411 BR 
550 --67$: .ASCIZ 
551 002262 bés: 
S52 O0e2be 005037 001440 CLR 
553 002266 005037 001436 CLR 
554 002272 005037 001202 CLR 
55S 0022 012737 O00001 00143 MOV 
556 002304 013737 001432 001434 MOV 
4 002312 LOOP: 
559 002312 042737 170000 001402 BIC 
560 002320 913737 O0140e 001404 MOV 
S61 O023e¢6 062737 OO000e 001404 ADD 
S62 002334 013737 O0140e O01405 MOV 
S63 O0e342 062737 O00004 00140E ADD 
564 002350 013737 OO1406 O014i0 MOV 
B65 002356 062737 OO00002e 001410 ADD 
567 
568 2 013737 001376 001400 MOV 
563 002372 062737 O00002 9001400 ADD 
571 
572 
223 tkTEST 1 
575 o02400 ooc240 Sri oP 
S76 O0e4%02 012737 oo00SO 001160 MOV 
577 410 012737 002440 001106 MOV 
578 O02416 112737 0001 00110e MOVB 
579 002424 112737 000001 901200 MOVB 
580 4 012737 002440 O0j110 MOV 
582 
583 
584 o02440 013746 oOD004 1$: MOV 
Bes 002444 912737 O02460 ooc004 MOV 


#SO,STIMES 3300 SO ITERATIONS 
#1$'$LPADR ‘SET SCOPE LOOP ADDRESS 
#i, $TSTNM taeT 1 TEST #1. 

#1’ STESTN :DON’T Forcet APT! 

#14, SLPERR 


QBERRVEC, -(SP) 
#23, JBERRVEC :SET 
:WE TIME-OUT WHEN ADDRESSING THE KWil 


s Save CONTENTS OF ADDRS 6. 


TIME-OUT TRAP VECTOR TO hANDLER in CASE. 


FOS 
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DVMNCA. P11 Tl *#TEST THE ADDRESSABILITY OF CILOCK CSR 

S87 ooe4s2 oOSTT7 176720 TST JASR :ADDRESS THE CLOCK! 
See GIF CLOCK DOEs NOT RETU 
289 :“BuS SSYN” THEN WE'LL ME -OUT 
591 o024S& o00406 BR 3$ ';THE CLOCK WAS THERE! EXIT SUB-TESt. 
S92 002460 23: 
593 002460 O62706 occoo4 ADD #4, SP D #4 To sTACK POINTER. 
e32 O0e464 O13737 50i376 oo14e4 MOV ASR, STMPO ;FOR ERROR” YPEOUT 
596 

: : SSSSSSSSSSSSSSSSSSSSSESS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
599 O0e472 104012 ERROR 12 ;REPORT ERROR=CLOCK CSR FAILED TO rETURN 
600 “BUS SSYN” WHEN 
60i i NOTE: iF PROGRAM HAS INCORRECT 
602 ADDRESS THEN WE MIG NOT J 
603 : TALKING TO THE CLOCK. MAKE SURE 
604 :OF CLOCK ADDRESS. 
e3e 

: : SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
605 002474 012637 oD0004 3S: MOV (SP)+, JSERRVEC 
611 
ble ; - LERKEEEEK EE REARS REE SAAELER SESE EAS SEES E SLASH ESSER L ESSE SESE ES 
bis :#TEST 2 *TEST THE ADDRESSABILITY OF CLOCK BUFFER REG. 
6i4 TO alan 6+ + atta acetate alcatel haiti 
B15 oo2s00 ococo4 +éT2 SCOPE 
617 
618 oOO02502 013746 oD00004 1$: MOV QKERRVEC,-(SP) ;SAVE CONTENTS OF ADOR $, g. 
619 O0e506 012737 OO2S22 oD0004 MOV #25, JBERRVEC :SET TIME- OUT TRAP VECTOR TO HANDLER IN CASE. 
620 il T me ~ ou? WHEN ADDRESSING THE KW1l 
62i 002514 005777 17666C TST JABR DRESS THE CLOCK! 
622 :IF CLOCK S NOT RETURN 
esa :“BuS SSYN™ REN’ WE EL TIME-OUT 
68S O0eS20 o0040E R ;T K WAS THERE! EXIT SUB-TEST. 

4 ADD #4, SP ADD #4 To STACK POINTER. 

be8 002526 013737 001400 o014e4 MOV ABR, STMpO :FOR ERROR YPEOUT 
620 

: ; SSSSSSSSSSSSSSSSSSSSSSSE>>> ERROR << « $$SSSSSSSSSSSSSSSSSSSSSSSSSSESTS 
632 902524 194012 ERROR 12 ; REPORT ERROR=CLOCK BUFFER REG. FAILED TC rETURN 
624 :"BUS SSYN” WHEN A 
£25 ; NOTE: IF PROGRAM ope INCORRECT 
636 ;ROORESS THEN WE MIG NOT BE 
E2- TALKING TO THE CLOCK. MAKE SURE 
F28 ;OF CLOCK ADDRESS. 


HO3 


MAINDEC- | Shier | MACYLL 27:(654) 27-DEC-77 09:32 PAGE 15 
OVMNCA. PL T2 *#TEST THE ADDRESSABILITY OF CLOCK BUFFER REG. 
pug Reena bee Ne ERREEESESEEEEEESSESSEEEEESEREEESSS ESOS EERE RES ERED SS 
B50 : STESt 3 #TEST TPAT CLOCK A STATUS REGISTER GIT 14 CAN BE SET AND CLEGRED 
652 : SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
653 :#F/7FS OR GATES 
fee ° 
bee +s SSSSSSSESSSASSEREPSEFSSFRE RE PSSSSSESSSSSSSSSSRSSSRSSSSSASSSS HSS 
’ OO0e542 o00004 tST3: SCOPE 
658 062544 012737 o00100 9001160 MOV #100,$TIMES ;;D0 100 ITERATIONS 
0 > I RK a A STATUS REGISTER. 
PbO BeSeee BOSSS ACBRED i meei2 SE 889F iw nse = ¢7SEFPEL PME S 
cs posses isras fueeas police my Sedntgusene'” Reno thet Status Rectae 
eS Bese5s 845535 aE B81 ise CMP ec50aF Reb bat B08 SANE ONC Y- BI FS. i4 SET? 
B65 002606 9001402 BEQ /IF so. iets TRY CLEARING IT, 
+  SSSSSSSSSSSSSESSSSSESSSS>>> ERROR << « $SSSSSSSSSSSSSSSSSSSSSSSSSESSSS 
669 O02610 104002 ERROR 2 ; “ERROR CLOCK AS STATUS REGISTER 
620 . :/BIT 14 FAILED TO BIT SET 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSE 
e274 p02bi2 oooN1e BR ey ;/BR TO ENO SUBTEST. 
676 002614 O42777 ONODDD 176554 1S: BIC #61T14, ASR ; TRY CLEARING BIT 14. 
677 OGebee 905037 001124 CLR $GDDAT :/CLEAR $/B FoR TYPEOUT IF ANY. 
678 O026e6 017737 176544 001126 MOV JASR, SBDDAT Bre READ IT BACK 
623 002634 900140) BEQ 2s “IF ZERO - NO ERROR! 
68i 


- : $SSSSSSSSSSSSSSSSSSSSSSES>> > ERROR << « $$SSSSSSSSSSSSSSSSSSSSSSSSSTSTS 


684 O0et36 104002 ERROR e 7ERROR -_ CLOCK A wins: | REGISTER. 
/BIT 14 FAILED TO CLEAR 





>  SESSSSSSTSSSSSSSSSSSESSS >> ERROP <<  F$SSSSSSTSSSSSSSSSSSSSSSSSTSEES 
es: 


—_—— oo ———_—_—_—— 


se! Cee SP fala 
. T3 


OVMNCA 


Turutufoe- 
Wwne-OwW 


SNIN“ININ 


O02e640 
O0Ge642 


002710 
002712 
20 


002734 


ee 


000004 
01e737 


601401 


194002 


060100 
176S2e 


001124 


020000 
O00ii24 
176446 


7.654 


1764S6 
001i2e6 


I03 


27-DEC-77 09:32 PAGE 16 
STATUS REGISTER BIT 14 CAN BE SET AND CLEARED ceo 0034 
, PRRRERb OS EROEDEDSESSSESEERERDSSEESESESEESEEDSSESSSSSESESESEESSS 
: STEST 4 #TEST THAT CLOCK A STATUS REGISTER BIT 13 CAN BE SET AND CLEGREC 
* SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
iF / ‘FS OR GATES 
eR ee eT eee ne Te trae 
TY; c 
MOV #100, STIMES ::00 100 ITERATIONS 
CLR aASR : CLEAR THE STATUS REGISTER. 
BIS #81713, 9ASR SET BIT 13. 
MOV #81713. $GDDAT i /SET FOR ERROR TYPEOUT S/B. 
MOV dASR, SBDDAT /READ THE STATUS REGISTEL.: 
CMP SGCDAT. SBDDAT : DID BIT 13 AND ONLY BIT 13 SET? 
BEQ 1$ :7IF SO-LETS TRY CLEARING IT. 
; ; SSSSSSSSSSSSSSSSSSSSSSESS>>> ERROR << «$SSSSSSSSSSSSSSSSSSSSSSSSSSSSES 
ERROR 2 : ERROR CLOCK AS STATUS REGISTER 
/BIT 13 FAILED TO BIT SET 
: : SSSSSSSSSSSSSSSSSSSESSSS>>> ERROR <<< S$SSSSSSSSSSSSSSSSSSSSSS55553553 
BR 2s ;/BR TO eNO SUBTEST. 
13: BIC #81Ti3, ASR ; TRY CLEARING BIT 13. 
CLR $GODAT /CLEAR S/B FOR TYPEOUT IF ANY. 
MOV JASR, SBODAT : NOW READ IT BACK. 
BEQ 2s “IF ZERO - NO ERROR! 


+ SSSSTSSLISSSSSSSSSSSSSSS>>> ERROR << «$SSSSSESSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 “ERROR - CLOCK A wily s: I REGISTER. 
: BIT 13 FAILED TO CLEAR 
>: SSSSSSSSSSESSSSSSSSSSSSSES >> ERROR << (S$S$SSSSSSSSSSTSSSSSSSITSSSSSSSSS 
es: 


OVMN 


CA.P 


002736 
40 


003004 


0 
003035 


003032 


MAINDEC- a es -A 


000004 
012737 


104002 


MACY11_27(65$4) 


#TEST THAT CLOCK A 


000100 
176424 


001124 


0040G0 
001124 
176350 


176360 
001126 


JO3 


<* DEC-77 09:32 PAGE i7 
IT 13 CAN BE SET AND CLEARED 


STATUS REGISTER B 


BUTTTTITTITTTTTTTITTTTTTTTITITITITITITTTTTTT TTL 


; ATEST 5 *#TESt THAT CLOCK A STATUS REGISTER BIT 11 CAN BE SET AND C 


 SCLOCK STATS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
i aF VFS OR GATES 


+ FEESESSAELESASESA PEAS SASESHSAESLHSRASAS FEES LHAE SESS SRSSR HERES HSS 


¢é15: SCOPE 


MOV #150, S$TIMES ;;00 100 ITERATIONS 
CLR aASR : “CLEAR THE STATUS REGISTER. 
BIS #81711, aaSR :/SET BIT il. 
MOV #8IT11'S$GODAT i/SET T FoR ERROR TYPEOUT S/B. 
MOV JASR, SBDDAT HE STATUS | REGISTE.< 
CMP SGDDAT , SBDDAT 701. BIT 41 BND Y BIT 11 SET? 
BEQ i$ ZIF SO-LETS TRY CNEARTNG IT. 
: ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << «$$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ; ERROR CLOCK AS STATUS REGISTER 


;/BIT 11 FAILED TO BIT SET 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


BR es ;/BR TO ENO SUBTEST. 
1$: BIC #B1T11,a9ASR ; “TRY CLEARING et 11. 
CLR SGDDAT ;/CLEAR S/B FOR yreuut IF ANY. 
MOV aASR, SBDDAT tie READ IT 
BEQ es “IF ZERO - NO ERROR! 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << « S$SSSSSSSSSSSSSSSSSSSSITSSESSSSSS 
ERROR 2 ;7ERROR - CLOCK A sTaTus REGISTER. 
:/BIT 11 FAILED TO CLEAR 
: : SSSSSSSSSSSSSSSSSSSSSESES >» ERROR <<  S$SSSSSSSSSSSSSSSSSSSSESSSSSISTETE 
es: 


CLEARED 


Onowooowwmm 
ob he 
ou fWwue-OwO 


003102 


003104 


003106 
003114 


003120 
003126 
003130 


003i 32 


MACY 
*TESt 


000100 
176326 
0 


001124 


000100 
B01 124 
176252 


i1_ 27.654) 
THAT CLOCK A 


176262 
001126 


27- aos mt 4 tt, Ae Bee 19 
ATUS REGISTER BIT 11 CAN BE SET AND CLEARED 
; jtagsesbstooseenseeeressenessassesessunestsnssssesscesesssssess 
: ATE #TEST THAT CLOCK A STATUS REGISTER GIT & CAN BE SET AND “L.ERFEC 
t SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIOCUAL 
;#F/FS OR GATES 
;* 


+ SSSSESSSESSSFSSSESSSLESLESESSSSSLSSARSSHFLFSSSSSSSSSFSSSSSSSS SSS 


Te: SCOPE 
MOV #100, S$TImES ;;00 100 ITERATIONS 
CLR 17k 7 THE STATUS REGISTER. 
BIS eer 4, aas rae 
MOV eBITe: SccbaT i“ T bp RROR TYPEOUT S/B. 
MOV aASR, $BDDAT REAO THE star Tus REG Gisté 
CMP SGODAT, SBODAT “DID B TG AND ONLY BIT © 1gET” 
BEQ 1 VF sb. LETS TRY CLEARING I 
: ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << « S$$SSSSSSSSSSSSSSSSSSSSSSSSSSS55 
ERROR 2 ;7ERROR CLOCK AS STATUS REGISTER 
:/BIT 6 FAILED TO BIT SET 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSE 
BR 2s ;/BR TO END SUBTEST. 
1$: BIC #8176, aASR Py CLEARING BIT ® 
CLR $Gcooat 7CLEAR S/B FOR TYPEOUT IF ANY. 
MOV JASR, SBDDAT READ I 
BEQ 2g IF ZERO - NO ERROR! 


>; SSSSSSSSSSSSSSSSSSSSESESS>>> ERROR << « $SSSSSSSSSSSSSSSSSSSSSSSSSSSISS 
ERROR 2 ; ERROR - CLOCK A STATUS REGISTER. 
:/BIT 6 FAILED TO CLEAR. 
> :SSSSSTSSSSSSSSSSSSSSESSES >» ERROR << (S$SSSSSSSSSSSSSSSSISSSSSSSSSISSS 
es: 


LO3 


MAINDEC-11-DVMNC-A MACY11 27.654) 27-0 ¢-?7 9:32, ,P BCE 3 19 
DVMNCA.P1Li Te #TEST THAT CLOCK A STATUS REGISTER BIT & CAN GE SET AND CLEARED 
gos :7e 
Bes 3 peoenegnennanensssesegececnsceetassen esse settee ett scan rt 
830 ; ATE *#TEST THAT CLOCK A STATUS REGISTER BIT S CAN BE SET AND CLEARED 
832 * SCLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
833 i #F FS OR GATES 
es ; 
836 +s FRSSSRSSSSESSSSSERESKAFASSSSSSSSKASASSASLSSRSRHKSSSSSHSSSSS SSDS 
837 003132 900004 $17: COPE 
838 003134 012737 oOO0100 001160 MOV #100,$TIMES ;;00 100 ITERATIONS 
Bad 003142 005077 176230 CLR ;/7CLEAR THE STATUS REGISTER. 
gus Goatees recor Soe dvtis Bi HEEB, EL PEL Eamon aveeoyr oe 
tie 
eis Bbitee Bi97a7 7O218 BBLis Roy ROR SBObRT Belo The, Status Rechert 
3/7 

B45 003176 00140e So § ts sb. Teeehy On EARING: fe 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> men ( (($SSSSSSSSSSSSSSSSSSSSSSSSSSSSSE 
849 003200 104002 ERROR 2 Y view CLOCK STATU REGISTER 
B50 AILED TO BIT 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> uet < ( (SSSSSSSSSSSSSSSSSSSSSSSSESSSSSS 
ess 003202 000412 BR 2s ;/BR TO END SUBTEST. 
856 003204 042777 OOD04O 176164 1S: BIC sB1TS,aASR Tey CLEARING BIT S. 
857 O03el2e 005037 001124 CLR $40 at /CLEAR S/B FOR TYPEOUT IF ANY. 
858 O032016 617737 176154 001126 MOV ASR, SBODAT /NOW READ IT 
859 003224 001401 BEQ 23 ZIF ZERO - NO ERROR! 
Bbi 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< $$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
864 oO03226 104002 ERROR 2 ; “ERROR - CLOCK A STATUS REGISTER. 
Be ;/BIT S FAILED TO cLEAR. 
BE7 

: : SSSSSSSSSSSSSSSSSSSSSSSS.>> ERROR << ( $$SSSSSSSSSSSSSSSSSSSSESSSSSE35 
870 003230 23: 


MAINDEC-11-OVMNC-A 


DVMNCA. P 


ll 


003230 


003276 
003306 
aie 10 

3332 
003324 


003326 


tT 


oo0004 
012737 


72 
77 


ee 


001402 


104002 


000412 
042777 


7 
ae 
1401 


104002 


MOS 


MACY11 27(654) 27-DEC-77 09:32 PAGE 20 
*#TEST THAT CLOCK A STATUS REGISTER BIT S CAN GE SET AND CLEARED 


MTTTITITIITTTTTITITTTITTCTIT ITLL titted 
; ATES! 10 #TEST THAT CLOCK A STATUS REGISTER GIT 4 CAN BE SET AND CLEAPED 


CLOCK srAlys REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INOIVIOUAL 
#F/FS OR GATES 


; 
| “N°” apegacamipaapnme cies aches tabla cs oes pita 


+67 
000100 001160 Mov #100, $TIMES ;;D0 100 ITERATIONS 


bo8436 17612 cue eee :/CLEAR THE STATUS REGISTER. 


ees Y RELINGEEEOOT 178 ‘A anos PERLE 2 


CMP SGDDAT, $B0DA DID B 
BEO oF So-LETS Arey OR AB ING a od 
cn aT, ERROR <<< $SS$SSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ; 7ERROR K STATUS REGISTER 
BIT 4 EASED to BIT ef 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
BR 2s ;7BR TO END SUBTEST. 
000020 176066 1S: BIC #BIT4, ASR $/TRY AGL EARING BIT 
091124 CLR pat : /CLE Me BO 11 FOR TYPEOUT IF ANY. 
176056 001126 V , SBDDAT 3/ REA T BACK. 
BEQ :/IF ZERO - NO ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << < $S$SSSSSSSSSSSSSSSSSSSSSESSSSSSS 
ERROR 2 ;7ERROR - CLOCK A STATUS REGISTER. 
:/BIT 4 FAILED TO CLEAR. 
> SSSSSSSSSSSSSSSSSSSESESSSS">> ERROR << « $$SSSSSSSSSSSSSSSSSSSSSSSSSSESS 
es: 


w 


ES 0039 


re) 


11-OVMNC-A MACY11_27(654) as S's 5 et g3 3§ per al 
-Pil T10 *TEST THAT CLOCK A STATUS REGISTER BIT 4 CAN BE SET AND CLEARED 


jtaseedstanesenssaeesassonennssserssesosssnssnsessessesesesses 


:ATEST ll #TEST THAT CLOCK A STATUS REGISTER BIT 3 CAN BE SET AND CLEARED 
i FoLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
#F7FS OR GATES 
pete itn ches Sate abs Aad Mal ae ee ‘ 
003326 000004 tST11: SCOPE aoe 
3330 012737 000160 001160 MOV #100, STIMES ;;00 100 ITERATIONS (oF 3 ‘ 
0033 005077 176034 CLR aASR ;/CLEAR THE STATUS REGISTER. 
ReReRE 052777 O00010 176026 BIS #8173, 9ASR eee rs. 
012737 000010 O01124 MOV #8173. $GODAT i736 ERROR TYPEOUT 5/8. 
Ses Bacar OTs BREE BE GARSEBSar ApS aL ant- Be BETTS cer 
3372 001402 BEQ 1 ; ts Oe ees TRY ce CLEARING IT. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< S$$SSSSSSSSSSSSSSSSSS55555553535 
003374 104002 ERROR 2 + ZERROR LOCK STAT REGISTER 
AILED TO BIT 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <$SSSSSSSSSSSSSSSSSSS3555355555S5 
003376 o00412 BR 2s ;7BR TO ENO SUBTEST. 
db 8 cg 
/ 
00341 p0393? 178760 001126 MOV OR Se0DAT 
001401 BEQ 2s AF ZERO - NO ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSESS>>> ERROR << « $S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


O03s4%2e 104002 ERROR 2 ;“ERROR - CLOCK A STATUS REGISTER. 
;/BIT 3 FAILED TO CLEAR. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS. > ERROR <<  $$SSSSSSSSSSSSSSSSSSSSSSSSESSSS 
003424 es: 


B04 


MAINDEC= 5} 1-DVMINC =A MACY11 271654) 27-DEC-? 77 09:32 PAGE 22 
DVMNCA. P11 Tli *TESt THAT CLOCK A STATUS REGISTER BIT 3 CAN BE SET AND CLEARED . SEG 0040 
963 
SEN g jtyreendetensennnnnsennnaaasssaapanasssensuenesssesssessesseez9? 
366 ; ATEST 12 “TEST THAT CLOCK A STATUS REGISTER BIT 2 CAN BE SET AND CLEARED 
967 * CLOCK STATUS REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIOUAL 
968 :#F7FS OR GATES 
383 ; 
97 +s FSESEREKKASSSSSSESSSKEASKRAEKREKSSSKESAFLASKESRAKSESRSLFRSSSF HSS SS 
972 003424 OD00004 +éT12: SCOPE 
373 003426 012737 oO00100 001160 MOV #100,$TIMES ;;D0 100 ITERATIONS 
975 003434 005077 175736 CLR aASR ;7CLEAR THE STATUS REGISTER. 
$76 003440 052777 000004 175730 BIS #81T2,9ASR : eT BI rs. 
877 003446 012727 O00004 001124 MOV sei Te, S$GDDAT y 3 a ERROR TYPEOUT S/B. 
$78 O0034S4 017737 175716 OO01le6 MOV R, $80 ORT /READ THE STATUS REGISTE.. 
979 003462 023737 001124 OO0l1le6 CMP SGocAT $B 57030 BIT 2 AND ONLY BIT 3° SET? 
380 003470 00140e BEO i$ 7IF SO-LETS TRY CLEARING IT. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ween ( < ($SSSSSSSSSSSSSSSSSSSSSSSSSSSSEE 
984 003472 104002 ERROR 2 ;/ERROR CLOCK AS STATUS REGISTER 
385 :/BIT 2 FAILED TO BIT S 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
389 003474 oo00412 BR 23 ;/BR TO ENO SUBTEST. 
991 003476 042777 O00004 175672 1S: BIC #81T2,9ASR ; 7 TRY CLEARING B 
992 003504 005037 O0i124 CLR $GODAtT /CLEAR S/B Be cout IF ANY. 
993 003510 017737 175662 001126 MOV JASR, SBDDAT NOW READ if 
333 003516 001401 BEQ 2s :7IF ZERO - NO ERROR! 
396 ; 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
999 003520 104002 ERROR 2 VERROR - CLOCK A STATUS REGISTER. 
1960 :7/B1T 2 FAILED TO CLEAR 
1502 


;  SSSSSSSSSSSSSESSSSSSSSSES>> ERROR << ( $$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1005 od03S22 es: 


MAINDEC-11-OVMNC-A 


DVMNC 


A. 


ww 


OON000000000 
b= bh CCD 
1 NOU £ Wrur-O 


FEREaS 


ee ee be he he oe ee he oe 
wi 


o 
o 


pe 
000 
WW 
~OwW 


Pill 


003606 
003€14 
OC3616 


003620 


Tle 


000004 
012737 
00S077 
0S2777 
012737 
Bhc7 Z 

3737 
001402 


10400e 


000412 
042777 
00$937 
017737 
001401 


194002 


CY11_ 27(654) PAGE 23 
TTEST THAT CLOCK A STATUS REGISTER BIT 2 CAN BE SET AND CLEARED 


000100 
preee 
rege 


ori 


oo000e 
001124 
17SS64 


001160 


Olleb 


17SS74 
001126 


CO4 


27-DEC-77 09:32 


;7e 
; HRRAORDREOUNORODRERED EOE EROSEEESHERESHSHEROEEEESESEEOEEEESE OSes 


sSTEST 13 #TEST THAT CLOCK A STATUS REGISTER BIT 1 CAN BE SET AND CLEARED 


t FCLOCK gTaTys REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INDIVIDUAL 
i #F/FS OR GATES 


OC eat 5+ | gills tana tata liek ela teactnts 
T13: SCOPE 


MOV #100, STIMES ;;D0 100 ITERATIONS 
CLR JASR oat r STATUS REGISTER. 
BIS #BIT1,9ASR 7 
ey UL Eee eho oe ELT REE 
CMP #0 pA ee BooAT 7, rete 1 geT” 
BEO 1$ AF OS Lets AoRy te ARING IT 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> nen << (SSSSSSSSSSSSSSSSSSSSSSSSS555555 
ERROR 2 7 RROR CLOCK STATUS REGISTER 
/BIT 1 FAILED TO BIT SET. 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< S$SSSSSSSSSSSSSSSSSSSSSSSSSSSS55 
BR 2s ;7BR TO END SUBTEST. 
1S: BIC 8BIT1,9ASR s/IRy CLEARING BIT 1. 
CLR $copAt /CLEAR S/B FOR TyPEOUT IF ANY. 
MOV JASR, SBDDAT /NOW READ IT 
BEQ 2s IF ZERO - NO ERROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << «S$S$SSSSSSSSSSSSSSSSSSSSSSSSSESSE 
ERROR 2 ; ERROR - CLOCK A rere REGISTER. 
:/BIT 1 FAILED TO CLEAR 
;  SSSSSSSSSSSSSSSSSSSSSESES>>> ERROR << « $$SSSSSSSSSSSSSSSSSSSSSSSSESTSS 
es: 


SEG O04) 


MAINDEC-11-DVMNC-8 
DVMNCA.P11 


iQ$3 
i0S4 
is 
is 
1058 
1059 


PEPPER ERR 


e 


bb Oh he eh - 
00 

“IN 

K-OwW 


S& 


003716 


003720 
003724 


T13 


000004 
012737 


001402 


104002 


OA aes 7 


10400e 


oocc04 


005077 
012737 





MACY11 27(654) 
*#TEST THAT CLOCK A STATUS REGISTER BIT 1 CAN BE SET AND CLEARED SEG OC4e 


000100 
bo880i 
17e5e2 


001124 


000001 
001124 
175466 


17S4S4 
leseSe 


001160 
175534 


001 18 


001126 


175476 
001126 


001124 


DOY 


27-DEC-77 09:32 PAGE 24 


MTTTTTTTTTT TTT TTT TTT TTT TT TTT TTT 
; #TEST 14 #TESt THAT CLOCK A STATUS REGISTER BIT O CAN BE SET AND CLEAFPED 


* SCLOCK eels REGISTER BIT EXERCISE. ON FAILURE-SUSPECT INODIVIOUAL 
sar /FS OR GATES 


+ FEREEKELSSREFAESLSS LAHSA AHAESSKHLALA SLA LELLLSLLERHLFHSS ESS SESS 


nen SCOPE 
MOV #100, $TIMES ;;D0 100 ITERATIONS 


gte Biro, ASR 7g 5, THe STATUS REGISTER. 


ME UM, RNG ae 


CMP ‘DID BIT O 0 SET? 
BEO :/IF SO-LETS AoRy ORE EARING IT. 
aa tlt ERROR << (SS$S$SSSSSSSSSSSSSSSSSSSSSSSSSSE5 
ERROR 2 ; ERROR K_ AS STATU REGISTER 
thi 0 EEOC ED Fo BIT 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
BR 2s ;/BR TO END SUBTEST. 
1S: BIC #BITO, JASR ;/TRY CLEARING BIT 0. 
CLR $cooAt /CLEAR RS/8 F FOR. TYPEOUT IF ANY. 
MOV QASR, SBDDAT : : OW RE 
BEQ s ZERO - NO BO RROR! 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 2 ;7ERROR - CLOCK A STATUS REGISTER. 
:/BIT O FAILED TO CLEAR. 
: ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << « $$SSSSSSSSSSSSSSSSSSSSSSSSTSSESS 
es: 
-RADIX 8 
Ty aia ts A ge 8 a et age? Se oe og op ot oy 
i STES *#TEST THAT PATERN 12S2eS2 WILL SET AND CLEAR IN BUFFER REG. 
jireeesesenseenonssanensernoersneunsesanseananinasnnnsinantasoess 


CLR @ABR ys 
MOV eleSeSe,$GODAT ;- 


R_ THE guerer REG. 
RD PATTERN: 1eSeSe . 


bh ee ee 
b= b= 
ee OOO 
Whe--OwOMs) 


bom 
Pb 
hobo 
@m-o 


+ b= bs be be ee 
— b= bs a 
tururururufrurofu 
ONIWUI EL Wlue- 


od 
b- bap 
WWW 
Gofue- 


8 ee he ee 
sb ee ee 
MUN ££ oS SEES CCW 
MV-OWOONCTULWw-OWO NT 





nel la > Matiiaiee> 
Pll Tis 


003732 
003740 


003746 
003754 


003756 


003760 
00376e 
003776 
00377 

004002 


oo4co4 


oc4006 


004006 
004010 


004030 


004036 
004944 


OC4O46 





Meera! 
#TEST T 


00i1e4 
175434 


001124 


175364 


175344 
001124 


2. PAGE es 
HAT BATERN 1eSeSe WILL "SET AND CLEAR IN BUFFER REG. 


$GDDAT, JABR 
JABR, SBDDAT 


err 


;7SET PATTERN IN meren REG. 
;/READ THE BUFFER REG 


i Ee THE PATTERN SET 0K? 
/YES-TRY CLEARING IT. 


; ; SESSSSSSSSSSSSSSSSSSSESSS>>> ERROR << ($$SSSSSSSSSSSSSSSSSSSSSSSSESSSSS 


ERROR 


;7ERROR PATTERN leSeSe FAILED TO 
:/SET PROPERLY IN BUFFER REG. 


; ; SSSSSSSSSSSSSSSSSSSSSSSE>>> ERROR << S$SSSSSSSSSSSSSSSSSSSSSSSSSSSESE 


#125252, JABR 
@ABR , SBODAT 
es 


;7GOTO SCOPE LOOP. 


;7TRY CLEARING a ea 
ZEXPECT ZERO 


READ BT eect REG. ,WAS IT ZERO” 


;7YES-NEXT T 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSISS 


; “BUFFER REG. COULD NOT BE LOADED 
;7TO A ZERO. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << «S$$SSSSSSSSSSSSSSSSSSSSSSSSSSSSE 


See ee TTT AAT PATERN Deceee WILL SET AND RHRKEFRASEE 


*#TESt THAT PATERN OS2S2S WILL SET AND CLEAR IN BUFFER REG. 


 eeneeeeeeeqqanunnscenenseneesnnansneseensesessaveesessssesssess 


1 27(654) 27-DEC-77 
175440 MOV 
001126 MOV 
001126 CMP 

BEO 
BR 
175410 18: BIC 
CLR 
001126 MOV 
BEG 
ERROR 
es: 
‘TES 
+éT16: SCOPE 
CLR 
001124 MOV 
175350 MOV 
001126 MOV 
001126 CMP 
BEG 


aABR 
ScDOAT, 8 SGDODAT 


scoot, sepa 


/CLEAR THE BUFFER REG. 

; “RECORD PATTERN: OSeS25 
;/SET PATTERN IN BUFFER REG. 
;/READ THE BUFFER REG. 


;7DID THE PATTERN SET OK? 
:/YES-TRY CLEARING IT. 


; ; SSSSSSSSSSSSSSSSSSSSESSS>>> ERROR << <S$S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSE 


ERROR 


; ; SSSSSSSSSSSSSSSSSSSSSSSS> 


; “ERROR PATTERN OS2SeS FAILED TO 
;/SET PROPERLY IN BUFFER REG. 


»> ERROR << ($$SSSSSSSSSSSSSSSSSSSSSSSSESESS 
;“GOTO SCOPE LOOP. 








re 
on 
hope 
Ts 


oo40Se2 
004060 
004064 
004972 


+ hb be 
hb he he 
NOW L£Wwue- PD 


oc4074 


or 
Pn ot 

a4 
fluro 


OC4076 


DO4O76 
004200 


004106 
OO4ile 


DODO D OOOO OODOMWMMM-)-I-I~I-) 


PML wu Oww GRR Lo Owe IMM Laifue-OwWOM- IjIKWM 


004120 


004126 
004134 


904140 
004144 


+ b= = b= = Be Bs bs Be ho he ee he ee ed 8 be be be be Be se eh se 
QON0O00OOWWwW 


PUTUTUTOPU PUTU PU PU TU NUM & bo = = eb ee ee ee ee ee 


---O00 
*-OwWMN 





-OVMNC-A 
T16 


042777 
7 


104003 


oooo04 
0ie73?7 


005077 
112777 


017777 


013737 
105037 


105737 
00i401 


‘muoe 
04001 





MACY11_27( 654) 


OSeSeS 
O0ii2e4 
i7S310 


oaco0se 


175264 
127677 


17S320 
001126 


001160 


i17SeS6 


175000 
061124 





27-0EC-77 09:32 
*#TEST THAT PATERN OS2SeS WILL SET AND C 


1$: BIC 
CLR 


PAGE 6 


#0S2eSe5 ,, JABR 
$GODAT 
JABR , SBDDAT 
es 


FO 


LeQR IN BUFFER REG. 


;/7TRY CLEARING PATTERN. 
: “EXPECT ZERO BACK. ot 
:/READ BUFFER REG. WAS IT ZERC 
:/YES-NEXT TEST. 


;  SSSSSSSSSSSSSSSSSSSSSSSS>» > ERROR ‘<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSESS 


ERROR 


3 


;/BUFFER REG. COULD NOT BE LOADED 
:/T0 A ZERO. 


: ; SSSSSSSSSSSSSSSSSSSSSSSE>>> ERROR << « $$SSSSSSSSSSSSSSSESSSSESSSSSSSE 


es: 


. SBTTL 
-SBTTL 
- SBTTL 


# 
* PHASE 2 ADVANCED BASIC LOGIC TESTS 
& 


5 EERE EEREEAE SESSA EEE REEL EERE LE SEAS PERE RARER EEE SES ESE SESE ES 
*TEST THE LOW BYTE OPERATION OF CLOCK’S STATUS REGISTER 


:#TEST 17 


7* 
;#WE CAN SUCCESSFULLY WRITE EVERY BIT_IN STATUS 
;#NOW LETS CHECK THE BYTE OPERATION OF THIS REG 


EG A 
TE 


R 
ISTER. 


5 SEFESEESEESESELEESFSEAHKSLSSHFSEKESFLEFFHLELEHLAASFLESSAFRE EHLERS 


tST17: SCOPE 
MOV 


CLR 
MCVB 


MOV 


MOV 
CLRB 


TSTB 
BEG 


; ; SESSSSSSSSSSSSSSSSSSSSSS > 
ERROR 


#S0,STIMES 


aASR 
#127677, aASR 


ASR, JSSD0DAT 


SBODAT , SGODAT 
SGDDAT+1 


SBDDAT+1 
1$ 


1 





;;00 SO ITERATIONS 
;MAKE SURE THE STATUS REGISTER IS CLEAR. 
;TRY_WRIT L BITS IN THE 

. LOGIC a re Severe iT 


EN INTO BECAUS 
ATOB INSTRUCTION. 


4m 


;STATU 
;FIX $GDDA 
;ANY RROR HA 


;ARE ANY BITS IN THE UPPER BYTE 
;OF THE STATUS REGISTER SET? 
;BRANCH NEXT TEST IF UPPER BYTE=0. 


nn 


oR ERROR TYPEOUT IF 


> ERROR << «$$$$SSSSSSSSSSSSSSSSSSSSSSSTSSS 


;ERROR - WROTE INTO UPPER BYTE OF 


CCURRED, UPPER BYTE CLEARED. 





P= hs bs ee be be hs ee bm oe he ee 
fMurururufufururuluforufurururufufururufurufufu 
LL LW WWWWWWWWwrufururrurrurore 
M—OWDONCU £WMOWD IMU Wutue- 


004155 


004150 
004152 


004160 


004164 


004179 


004176 


004202 


OO04e26 


004230 


cogoo4 
Ole?37 


00S077 


o0Se37 


112777 


008337 


017737 


001401 


104001 


MACY11_ 27: 654) 
*TEST THE LOW 


ooo00S0 
175212 
00137€ 


177213 


001160 


175200 


GO4 


27-DEC-77 09:32 PAGE e7 


BYTE OPERATION OF CLOCK’S STATUS REGISTER SEG CO4S 


;CLOCK’S STATUS WHEN 
;DO0ING A DATOB TO THE LOW SYTE. 


:  SSSSSSSSSSSSSSSSSSSSSSSS> >» ERROR << SESSSSSSTSSSSSSSSSSSSSSSISSSSSS 
i$: 


; SHEERS RESEESES ESS ESE SE REESE ESHER TREES SEES ES ES SESS SESSLER EES ES 
reTESt 20 *#TEST THE HIGH BYTE OPERATION OF A*S STATUS REGISTE® 


t WE CAN SUCCESSFULLY WRITE EVERY BIT IN STATUS REG A 
: #NOW LETS CHECK THE BYTE OPERATION OF THIS REGISTER. 


es : SHSSSSSSSSSSESFRSASSSRELSSSSSSFSSSSES SHELF SFESSSSSFSSSHSFSSRS SE LASS 
S720: SCOPE 
MOV 


aSO,$TIMES -;DO0 SO ITERATIONS 

CLR JASR ;CLEAR THE STATUS REGISTER. 

INC ASR 00 #1 TO OTHE S STATUS REGISTER'S ADDRESS 
:$ O THAT WILL BE WRITING INTO 

PRE HIGH WEES 

MOVE #177213, aASR ; TRY WRITING ALL BITS IN THE STATUS 
tREGISTER. LOGIC SHOULD PREVENT THE LOW 
;BYTE THE STATUS REGISTER FROM 
:BEING WRITTEN INTO BECAUSE WE ARE USING 
:A DATOB INSTRUCTION WITH ADO SET. 

DEC ASR ;FIX ADORESS OF THE STATUS REGISTER ADDR. 
:SO WE CAN LOOK ar THE W 

MOV JASR, SBDDAT ‘READ BACK WHAT STATUS REG. "CON TAINS 

MOV $8DDAT, $GDDAT :FIX SGDDAT FOR Ms OR TYPEOUT IF AN ERROR 

CLRB $GDD OCCURRED, LOWER BYTE CLEARED. 

TST8 Hoa i1s LOWER R_BYTE CLE LEAR? 

BEQ 1$ :BR IF YE XT SUBTEST. 


5 SESTSSSSSSSSSSSSSSSSSSESS>>> ERROR << «S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSE 
ERROR 1 ;ERROR - WROTE INTO LOWER BYTE 
: OF CLOCKS STATUS REGISTER WHEN 
:DOING A DATOB TO THE HIGH BYTE. 
; ; SSSSSSSSSSSSSSSSSSSSESSS> >» ERROR << « $$SSSSSSSSSSSSSSSSSSSSSSSSSSESSS 
i$: 
«FEE RERERAEE EERE RE REARE SLES EEE EEE ERLE LEE ERE RE EAS RRS REAR ER EERE 


i bre ESt el *TEST CLOCK’S COUNT REGISTER WITH 125252 PATTERN 
FE EREEE SEES EERE SEES SEERE REEL E SEE ER EE ELSE PELE EE REELE EERE EEE EE 


404 


MAINDEC-11-DVMNC-A ACYL1 271654) 27-DEC-77 09:32 PAGE 2 
DVMNCA. P11 T21 PTESt CLOCK'S COUNT REGISTER WITH 125252 PATTERN 
4 4 TST21: SCOPE 
1883 R83535 899993 000100 001160 Roy #100, $TIMES :;D0 100 ITERATIONS 
le72 oOO4e4e O0S077 175130 CLR JASR ; SELECT MO E 0. 
leva O04246 Ole777 125252 175124 MOV #125252, JABR iLO 60 THE BUF FER REGISTER WITH 
le74 ATTERN 1 BE 
127s TRANG BRAD TO. TH COUNT REGISTER 
a 004254 oS2777 o00001 175114 BIS #BITO,aASR :SET GO BT? ACLonS BUFFER-COUNT REG XFER). 
é 
1e79 OO4262 012737 125252 001124 MOV #125252, SGDDAT T EXPECT PATTERN IN CASE OF 
1280 REED OF ERED OR TO PEOUT. 
le82 GO4270 O17746 175102 MOV JASR, -(6) Pg: CSR 
le83 004274 052777 OO4007 175074 BIS #4007, JASR */SET MODE 3,DIS INTR OSC NO RATE 
1284 :/THIS MUST BE DONE IN 
1285 :/ORDER TO XFERR COUNTER 
1286 3/TQ BUFFER ONS 
1287 004302 052777 001000 175066 BIS aBITS aASR /GENERATE ON ST2 PULSE 
1288 004310 Ole746 000010 MOV -{sp :/NOW GENERATE 
1289 004314 052777 OO00400 175054 64S: BIS aBite, 3ASR 
1290 004322 005316 DEC ;/EIGHT ST1 PULSES 
1291 004324 001373 BNE bas’ 
1e92 004326 005726 TST (SP)+ ;/RESET STACK 
1293 004330 017737 175044 001126 MOV JABR, SBDDAT :/READ THE PRESET BUFFER, 
1338 UESNERTE BRE TR 
1695 004336 012677 175034 MOV (6)+,9ASR TER $BDDAT. 
1296 004342 005737 001126 TST SBDDAT : /RESTORE CSR 
1298 004346 023737 001124 oO01126 CMP SGDDAT,SBDDAT ;01D ALL THE BITS AND NO OTHER BITS 
1299 :COME THROUGH 
1390 004354 00140: BEQ iS :BR IF YES TO ° NEXT TESt. 
1302 


>  SSSSSSSSSSSSSSSSSSSESSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


1305 oo43S6 104005 ERROR 5S ;DATA ERROR CLOCK - PATTERN “125252” 
13 ;FAILED TO TRANSFER PROPERLY BETWEEN 
130 :SU OFFER AND COUNT REGISTERS. 
130s 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSESSSSSSSSES 

304360 1S: 
5 EAS SAAASASELAERASAE SHEARS LEKA LKR LASA RAKES ELAAF RARE LLL ESSE 
‘RTEST 22 *#TEST CLOCKS COUNTER REGISTER WITH OS2S2S PATTERN 


SHES EESSEEAASLAEASESEAASESSSLAHLEFLEFLELELEKHLAEAERAHKKRASALESERE 


et ee eet et ee ee 
WWI QUOD GW 00) GI 


TOTO TU ob bo os 
tur-OWM NOW £ Wor 


004360 900004 tét22: SCOPE 

004362 012737 ooo0so 001160 MOV #S0,STIMES ;;DO0 SO ITERATIONS 

904370 005077 175002 CLR JASR ;SELECT MODE O. 

304374 012777 Os2525 174776 MOV #052525,dABR §§ LOAD THE BUFFER REGISTER WITH 
;PATTERN OS2S25. IT WILL BE 


MAINDEC-11-DVMNC-& 
DVMNCA.F11 Tee 


i323 
i3e4 
13e5 
i3e6 
13e7 
13e8 


i 
Ww 
™ 
0 


pei riisiaistaistatststs 
EoeH SAB RRIERES 


ee ee 
WWWWWW 
WMf£LELL 
Owonow 


ee 
WWWWW 
Wuwiuut 
NOUECW 


064402 
304410 


004416 
004422 


OO4464 
004470 


004474 
004S5e2 


oo4so4 


004506 


OS2?77 
012737 


0i2677 
005737 


023737 
00i401 


000004 
012737 


00$037 
012777 


coooos 


MACY11 27 
#TESt CL 
000001 
oseses 


174754 
004007 


001000 
900010 
000400 


174716 


174706 
001126 


001124 


ooocos 


001124 
176377 


(654 


174766 
0C11e4 


174746 


174740 
174726 


001126 


001126 


001160 


174646 


TO4 


09:32 PAGE 29 
ocKks ZouNTER REGISTER WITH OSeSeS PATTERN 


2e7-DEC-77 


BI aBITO,aFSR 
MOV #052525 , SGDDAT 
MOV JASR, -(6) 
BIS #4007, aASR 
BIS agiTs aASR 
MOV -{sp 
64S: BIS aBite, SAR 
DEC 
BNE bas) 
TST (SP)+ 
MOV JABR, SBDDAT 
MOV (6)+,3ASR 
TST $BDDAT 
omP $GDDAT , SBDDAT 
BEQ 1$ 


; ; SSSSSSSSSSSSSSESSSSSSSSE> >> 
ERROR 5S 


‘oe ee TO THE COUNT REGISTER 
:SINCE THIS IS M 

:SET BC BIT(ALLOWS BUFFER-COUNT REG FER). 
;SET EXPECTED TO bY oak IN CASE OF 
i NEED OF ERROR TYPEOUT 

E 3 ae '3, per OSC NO RATE 
a must N 
ORO R Fe T FERRE COUNTER 


RON S 
/ GENERATE 8 ST2 PULSE 
: NOW GENERATE 


;7EIGHT ST1 PULSES 

; (RESET STACK 

; THE Hot © BUFFER, 
i RESTORE C 
;O10 ALL THE BITS AND NO OTHER BITS 
ise OME_ THROUGH? 
;BR TF YES TO NEXT TEST. 

ERROR <<< $S$SSSSSSSSSSSESSSSSSSSSSSSISSSS 
;DATA ERROR CLOCK - PATTERN “OSeS2s” 


;FAILED TO TRANSFER PROPERLY BETWEEN 
:;BUFFER QND COUNT REGISTERS. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS> >> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSTESSSSSESS 


iS: 
SHAFSASKFSSSASESHSFAKLHRAEARSSERE 
; BTEST 23 *TESt THAT INI 


i TESTING OF THE INIT Logre AS 
O STATUS REGISTER F/FS. 


EEFEAESESERHESESSESRSRAEESEE SER EE ES 
T CLEARS STATUS REGISTER 


RECEIVED FROM THE QBUS AND BUFFERED 


SLELASFSSEFASSSSLALASSHSRKARESAAFSSRAAFLALHSLHHAELFFHFSRESHS SPAS SE 


ia? T23: SCOPE 
MOV eS, STIMES 
CLR $GDDAT 
MOV #176377, JASR 


RESET 


;;00 S ITERATIONS 


;EXPECTED DATA IS ZERO 
:SET ALL BITS IN THE STATUS REG. 


;SYSTEM INITIALIZE. 


JO4 


MAINDEC- L1-DVMINC=8 MACY! 11 271654) 27-0EC-77 09:32 PAGE 30 
DVMNCA. P11 T23 TEST THAT INIT CLEARS STATUS REGISTER 
1377 
1378 OO4S32 O17737 174640 001126 MOV JASR, SEDDAT READ THE STATUS REG., ALL BITS SHOULT 
1373 HAVE BEEN CLEARED BY’ INIT ; 
1380 oo4s4o 001402 BEG 1$ ‘ge IF YES TO nEXT TEST 
1382 
. : ES$SSSSSSSSSSSS5S0SSSS3%> > ERROR <« ( SSSSSSSSSSSSSSSSSSSSSSSSS555555 
1385 
1386 oo4“s4e 104002 ERROR 2 sERROR - SYSTEM INIT FAILED TO CLEAR 
1387 :STATUS REGISTER CLOCK A. 
1388 
: : SETSSSSSSSSSSSSSSSSESSESS>>> ERROR << (SSSSSSSSSSSSSSISSESSSSSSSSS5555 
1392 oO4S44H oOD004IE BR TST24 53 
4333 Bove4e 005737 o01444 ~ 1ST S TEST EXTERNAL SIGS” 
7 4 x ; x L SIG 
1395 o045Se 001413 BEO sT24 . 
1338 004554 005737 001450 rst DWArF 
1398 O04S6e 052777 O1600e 174626 BIS ebrfistertizvertidserry aoR2 ,ENABLE ST1,ST@ TO LATCH 
1399 004576 032777 GOOODE 174616 BIT aOR .ST2, OVERFLOW SET 
1490 0O4S76 001401 BEG feta 33 
. : SESSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1404 oo04600 104006 ERROR 6 ; INIT FAILED TO CLEAR 
1405 :ST1,ST2, AND/OR OVERFLOW 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << < $$SSSSSSSSSSSSSSSSSSISSSSSSTESE 


14093 

i410 - LEREEEERSSEEEEREREEREEERERERERREEEEAEE RS SSR ERE ERSESES ERED DEEDES 
ints ; STESt 24 #TEST THAT INIT CLEARS BUFFER REGISTER 

1413  STHIS TEST IS DESIGNED TO SEE IF “INIT H™ 

1414 :#CL ARS THE BUFFER REGISTER. < ALREACY 

aie 5 KNOW IT CLEARS THE STATUS REG 

1417 4 * pPOGOSORSROESSESEORGSEOOERERERDEREDERERREREEEESDSERORDEDEDEREC8 
1418 004602 o00004 +é124: SCOPE 

tude O0O4604% 012737 ooo00S O011E0 MOV aS.STIMES ;;00 S ITERATIONS 

1421 OO46le O00S037 o0112e4 CLR $GODAT :CLEAR EXPECTED DATA 

iiss OO4%6i6 012777 177777 174SS4 MOV #177777, dABR : SE ALL BITS IN THE " BUFFER REGISTER. 
jase oo4%62e4 oocoos RESET ; ISSUE SYSTEM INITIALIZE. 

i426 004626 017737 i74S46 goli2sb MOV @ABR , SBODAT sREAD THE BUFFER REGISTER, ALL BITS 
1427 a as ; SHOULD HAVE BEEN CLEARED By INIT. 
jase OO4E34 90:40) BEG 1% :BR IF YES TO NEXT SUBTEST. 

14230 


——  — er + ——— 


MRINDEC-1i-OVMINC -4 
T24 


DvVMnCAR. Fi 


il 


004636 


004704 


30 
004732 
004740 


oo4742 


O04744 
OO4746 


194003 


008777 
100462 


19400i 


000410 
042777 


KO4 


1 27.654 7-DEC-77 09: 32 PAGE 31 
ates THAT INIT SLEARS BUFFER REGISTE 
; ;SFSSSSSSSSSSSSSSSSSSESSS> © ERROR << SSSSSSSSSSSSSSSSSSSSSSSTSSESESS 
ERROR 3 ;ERROR - SYSTEM INIT FAILED: 
:TO CLEAR BUFFER REGISTER A 
:  SSSSSSSSSSSESSSSSEESSE53> > ERROR << SSSSSSSSSSSSS5SSS55555555553553 
1$: 
001444 TST xs : TEST EXTERNAL SIGS? 
BEQ sT2s 33 
001450 TST DWARF 
BNE TSTes : 
016000 174534 BIS eBITi1:erTi2:e1Tlb,aorRe ;ENABLE THEM 
; SSSSSEEAASSSASALELAESSESLRSSAREKLKSSLA ALLL S LEELA ELSES ES; cPttssase 
iSTEST 25 *#TESt THE SETTING OF MAINTENANCE ST2 IN CLOCK BIT iS 7° SET 
+ SSFSSSSSESSFSSSSSSSSSESSSSSSSSSSRASSSRESKESSSSFLSSPKFSESSS PEASE 
4ét25: SCOPE 
174506 CLR ;2 CLEAR THE CSR 
000001 174500 MOV #1. JASR :SET THE GO BIT(ENABLES ST2 TO SET FLG). 
001000 174472 BIs eB tT9, aASR :SET MAINTENANCE STe. 
174466 TST JASR ;DID BITIS (ST2 FLAG) SET’ 
BMI 1$ :BR IF YES - NEXT TEST 
:  SSSSSSSSSSSSSSSSSSSSSSESS>>> ERROR <<< $SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERPOR 1 RROR - MAINTENANCE ST2 (B1T9) 
ID NOT SET BITIS (ST2 FLAG: 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSESSSSSS3 
R TSTeb t3 
oO1444 1S: oat EXS : TEST EXTERNAL SIGNALS” 
BE os 
001450 TS DWARF 
a " BNE TST26 $3 
oo0004 174454 I sBIT2,a0R :OID EXTERNAL ST2 GET SET? 
BNE 2s 
:  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <« « $SSSSSSSSSSSSSSSSSSSSSSSSESSSEE 
ERROR 6 ;$T2 OUT oft? DETECTED 
:BY TEStO 
: : $$$$SS$$SSSSSS$S$S3SSSSS" >> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
BR TST26 33 
100000 174422 23: BIC s8IT1S,aASR :NOW TRY CLEARING ST2 FLAG. 


MAINDEC-11-DVMNC-A 
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Finiitetai to bettie 


+ bo ee 
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fur fu 
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wu 
en 
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oo47s4 
CO4762 


004764 


o00S034 
00S036 
ooso44 


b0se6 


o0scte 


aE 


104001 


000004 


104001 


042777 
032777 
001401 


104001 


coooo04 
012777 
2777 
3e777 
01001 
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100060 


020000 
1000 
0001 
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174414 


174374 
174366 


174354 
174346 


174332 
174324 
174316 
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27-0EC-77 Bee st My 
THE SETTING OF nA TNTENAN ST2 IN CLOCK BIT 15 TO SET SEG OOSO 


Bit 9841), ASR ;010 IT CLEAR?” 
EG TST26 3 
;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSISSSSSSTSSSSESSS 
ERROR 1 ;ST2 FLAG FAILED TO CLEAR. 
; ; PSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << < $$SSSSSSSSSSSSSSSSSSSSSSSSESSS5 
peeegeecnanensenesermpcogsagenneseterre inte itt 
T 26 *#TESt THAT STi FLAG SETS ON MAINTENANCE STi 
itusoedGansnsnasosscancovesouestesensssencenssouscousseazeesees 


CLR aASR ig § Shen in THE c#F 
BIS #B1T6, 2ASR 


BIT ag1T10, JASR 3 O10 STL FbaG ise”? 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 1 ;2 ST1 FLAG FAILED TO SET 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSE 


1$: Ic #BIT10, AASR ;2@ NOW TRY CLEARING IT. 
Bit a8: 110, ans :§ Oo IT clEBR® 
EQ TST2 ‘3 
+: SSSSSSSSSSSSSSSSSSSSSSESS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSSESE 
ERROR 1 ; Tl FLAG FAILED 
is 25 cLEAR 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <$SSSSSESSSSSSSSSSSSSSSSSSSSSSSS 


+ SERSAEESKAAESSKASASHASSHRSKESKKSKKSAASRKHAKSELASFRAELERRASHHASEE 
TEST 27 #TEST THAT BITOO IN CLOCK STATUS REG. WILL SET WHEN BITI3 AND MAIN. ST2 
+ > SHSRESSESSHSEESSSS FHKEASKASKASALAEASAAKSKAKEKAAKHHHKAKRKRSKKRAAF SDE 
t$127: SCOPE 
MOV #81713, JASR ;SET “ST2 ENB COUNTER” IN CLK STATUS REG. 
BIS #8179 dASR :GENERATE A MAINTENANCE STe. 
B11 sett : O ITO0 (GO) ? 
is :BR IF YES - NEXT TEST. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


ERROR 1 ;ERROR - BITOO OF CLOCK’S STATUS REGISTER 
[FAILED TO sET WHEN BIT13 WAS SET 
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*TEST THAT BITOO IN CLOCK STATUS REG. WILL SET WHEN BIT13 AND MAIN. STe 


020000 


174274 


174266 
74264 
0061 
000400 


174204 


174174 
001126 


174304 


174254 
174246 


174234 
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174214 


001126 
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27-DEC-77 09:32 PAGE 33 
;AND A MAINTENANCE ST2 GENERATED. 


;  SSSSSSSSSSSSSSSSSSSSSSSS> >> ERROR << (S$SSSSSSSSSSSSSSSSSSSSSSSSESSSSSS 


1S: T #81713, 9ASR :0 T 13 CLEAR ITSELF?” 
Bea Ho Ore Be ateab- 
, | S$SSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSS5S555555555 
ERROR 1 ;BIT 13 FAILED TO CLEAR. 


;  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <$S$SSSSSSSSSSSSSSSTESSSSSSSSSSSSS 
es: CLR dASR ;LEAVE SUBTEST WITH CLOCh. CLEAR. 


-SBTTL #& 
“gett SPHASE 3 COUNT TESTS 


; eee eee reer ere SEE IF THE COUNTER WILL INCREMENT 
I eTES #TEST TO SEE IF THE COUNTER WILL INCREMENT 
Pe NS a oo ane 


CLR JASR 
Sic sort 'BIT4!BITO, seek 
8B 18. SASR hit STi. 


BIS 
Hh My 2 clock ¢ 
Vv JASR, ~(6) 
BtS o88?. S8SR Ae 3,01S oaTe osc NO RATE 
i7 TBE Bone PR COUNTER 
3770 ON ST 
BIS egiTe aasr /GENERATE ON ST2 PULSE 
MOV -tsp NOW GENERATE 
64S: BIS aBite, SASR 
DEC ct ; EIGHT ST1 PULSES 
oF (SF)+ 3 RESET ST STACK 
MOV’ SRBR’ SBDDAT RE PRESET BUFFER, 
: PREVIOUS COUNTFR 
MOV (6)+,3ASR : 760n ONTEN ws. ARE IN SBDDAT. 
TST $BDDAT /RESTORE C 
BNé 1$ YES, NEXT fest. 
:  SSSSSSSSSSSSSSSSSSSESSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSESSSSSSSSSSSSES 
ERROR 6 ;CLOCK FAILED TO INCREMENT. 
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000004 
012737 
077 

77 
012737 
012737 
012777 


052777 


104006 


oo044s 
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ay 


005737 


Teed 
Beas 
001402 
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Biest 16 SEE IF fae COUNTER WILL INCREMENT 


000010 
174150 
174146 
000000 
005404 
000061 
000400 
001444 
001450 


o0000e 


001160 


001124 
001110 


174122 
174114 


174110 


174052 
174044 
174036 
001126 


1424 
1126 


; ; SESSSSSSSSSSSSSSSSSSSSSS>>> ERROR << «S$$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


1$: 
5 | SASRAKSSAELSAAASLSASKKSKAAAELAAKSKAALKSRHKKESELKSAKSEKHSRHSS SSS 
:€TEST 31 *#SEE IF CLOCK WILL COUNT UP FROM A ZERO BASE, RATE:ST1 
;*# 
# NOTE: IN THIS TEST, LOOP ON ERROR WILL CAUSE A LOOP 
;* ON THE FALLING COUT PATTERN; 
;* WHILE LO N TEST WILL START THE TEST 
i* AND THE CLOCK FROM ZERO TO THE FAILING COUNT. 
WU TITITITITIT TTT TIT T TTT TI TITITITITITITiTiiTiiiiiiiiriitiiiie 
tST31: SCOPE 
MOV #10, $TINES ;;D0 10 ITERATIONS 
CLR GASR : CLEAR THE CSR. 
CLR ABR :CLEAR T UFFER REG 
MOV #0, S$SDDAT ;CLEAR EXPECTED. 
MOV a2$, SLPERR 
1S: MOV #BITS!IBITY!BITO,IASR ;START CLOCK, RATE:ST1. 
BIS #8178, JASR ;GENERATE A MAINTENANCE STI 
i CLOCK SHOULD COUNT ONCE. 
TST EXS :TEST EXTERNAL SIGNALS? 
BEQ 10$ NO 
TST DWARF 
BNE TST3e 33 
BIT *BITI, aOR i YES - DID ST1 GET SET? 
INE a ;YES 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <S$SSSSSSSSSSSSSSSSSSSSSSSSSSS555 
ERROR 6 ;ST1 OUT NOT DETECTED 
;BY TEStOR 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< $SSSSSSSSSSSSSSSSSSSSSSSSSES535 
BR TST32 23 
10$: 
;7-ROCLKI- 
MOV JASR,-(SP) : “SAVE CSR CONTENTS. 
Bie settle aASR iER ST FLRG 
BIS $119 dASR 37 RATE ST2 PULSE. 
MOV BODAT ; T REG. 
B1s (SP)4+. ASR 37 COR. 
S sBodat Vv ONTENTS OF COUNT REG 
INC 


< 


37 
FS00eT armen eeenine SORT 
SebBat: SeoDeT COUNT AD=COUNT EXP’ED? 
2¢ :YES - SEE IF WE'RE THROUGH. 


Bae 


SEG 00Se2 


BOS 


so) Sins a }i-owre <2 MACY11 27(654) 27-DEC-77 09:32 PAGE 35 


DVMnCA.P11 T31 *#SEE IF CLOCK WILL COUNT UP FROM A ZERO BASE, RATE:5Ti 
1647 
; ; | SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR < « < S$SSSSSSSSSSSSSSSSSSSSSSSESSSSSS 
1650 oos4oo 104011 ERROR 11 ;CLOCK FAILED TO COUNT UP PROPERLY. 
: ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << « SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1654 oos4o2 000410 BR 3s ;GOTO SCOPE LOOP. 
1656 00s 005077 173766 2s: CLR JASR 
1657 OOS410 013777 O0ile4 173762 MOV S$GDDAT, JABR 
1688 005416 005737 001124 TST SGODAT ;ALL_ DONE? 
1659 005422 001311 BNE is :NO DO NEXT INCREMENT. 
1660 o0s4 3S: 
166e 3 eee eee e eee eeet THAT OVERFLOW (CGR BITO?) WILL SET. APRESS RSE 
1663 i $TE #TESt THAT OVERFLOW (CSR BITO7) WILL SET ON OVERFLOW 
1664 Feet te ccnusa ee eneeaneeehnatenaabnaabnannnennebensensansenes 
1665 o0s424 oo0004 tines’ SCOPE 
tees 005426 005737 001444 TST ExS TESTOR MODE ENABLED?? 
1668 005432 001410 BEQ es NO-THEN SKIP NEXT SECTION OF CODE. 
1669 005434 ? 001450 TST WARF 
1670 o0s440 001042 BNE TST33 33 
1672 ooSs442e O0S2777 Oe2000e 173746 BIS #81T13!BIT1,a0R2 
1673 go5450 012700 ooco10 - MOV #8. ,RO ;SET TIME OUT NUMBER. 
1675 005454 005077 173716 ; CLR aASR ;CLEAR THE CSR 
1676 O00S460 012777 177777 173712 MOV #-1, JABR :SET PRESET BUFFER TO ALL ONES. 
1678 D0S466 052777 000061 173702 BIS #BITS!BITY!BITO,3ASR ;START CLOCK, RATE ST1. 
1680 005474 0S2777 OD0400 173674 BIS s81T8,3ASR ;COUNT CLOCK ONCE, OVERFLOW 
1eg3 o0ss02 105777 173670 TSTB JASR B19 SveREL OM. SET? 
1683 oosso0e 100402 BMI 1$ YES - THEN NEXT TEST 
1685 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< $$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1 eam age eee FARCE 18°51 SH oGERRESI” 
1690 o05S1i2 o00415 BR TST33 ; 
1691 005514 005737 oO01444 1S: TST EXS test EXTERNAL SIGNALS” 
1692 005520 O0i14i2 BEO TST33 33 
iees Boers Bpicer oO me | TE 
ies Buses Goigag 0000S 73686 Be, 
1697 005540 005300 DEC RO ‘AID WE ALLOW ENOUGH TIME?? 
1698 o00SS42e 001364 BNE 1$ !NO-THEN WAIT 


;  SSSSSSSSSSSSSSSSSSSSSSSS»>> ERROR <<< S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
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#TEST THAT OVERFLOW (CSR BITO7) WILL SET ON OVERFLOW 


173622 
177777 
000061 
000400 


000001 


173560 
177777 
O0C0063 
000400 


000001 


173616 
173606 
173600 


173872 


173554 
173544 


173536 
173536 


COS 


27-DEC-77 09:32 


ERROR 6 ; OVERFLOW OUT NOT DETECTED 
;BY TESTOR 


: ; SSSSSSSSSSSSSSSSSSSSSSSS> >> ERROR << «SSSSSSSSSSSSSSSSSSSSSSSESSSSESSS 


5 FREREREEE SEES EELE SEES AEAELE SEES SRSA EESSA ERASE ELSS SPSS REESE SES 
;#TESt 33 *#TEST THAT OVERFLOW WILL CLEAR THE GO BIT 
- - FFL SEESLSSESSLLSASSLSLS SS SSS SSS SSSAS SSF SSASSLS SSS SSS SDSS SSS 


+6133: SCOPE 


CLR JASR ;CLEAR THE CSR. 

MOV #-1,dABR ;PRESET CLOCK TO -1. 

BIS SBITS!BIT4!BITO,MASR ;START CLOCK, RATE:ST1 

BIS #BIT8,d9ASR ;COUNT ONCE, OVERFLOW 
‘ENABLE CESK AY TEO) 

Bea tg PSR EVES NEXT TEST. 


:  SSSSSSSSSSSSSSSSSSSSSESSS>>> ERROR << «SSSSSSSSSSSSSSSSSSSSSSSSSESSESSS 


ERROR 6 ;ERROR - OVERFLOW FAILED 
;TQ CLEAR ENABLE (CSR BITOC) 
1$: 
5p RHRERERRRERRRERE LARSRAKAAAAAFSKASLAAEAAARAKELKSSSRESRSRHARAFRFE RES 
:STEST 34 *#TEST THAT GO BIT DOES NOT CLEAR ON OVERFLOW, IF “Suc 


aH EEERREEEREEEREREREREE SE EEEEEEESEEEEEEEEREEESREEE RES BEES ERES ER ES } 
+ST34: SCOPE 


CLR @ASR ;CLEAR THE CSR. 
MOV #-1,d9ABR ;PRESET BUFFER=ONE COUNT FROM OVERFLOW. 
BIS #63, d3ASR ;MODE 1, RATE:ST1, GO. 
BIS #BIT8,dASR ;GENERATE MAINTENANCE ST1. 
IT #8170, dASR ;D]0 ENABLE T) CLEAR? 
Bee IB (RO cG00B) NEST PEST. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ERROR 6 ;GO BIT CLEARED ON OVERFLOW 


;WHEN MODE 1 WAS SELECTED 
;  SSSSSSSSSSSSSSSESSSSSSSSE>>> ERROR << « $$$SSSSSSSSSSSSSSSSSSSSSSSESSSS 


MAINDEC-11-DVMNC-8 
DVMNCR.F iL ™34 
i7S6 
175° ooséSe ooso77 
1758 
i7s$ 
1766 
1761 
1762 
1763 
1764 
tee 
i5e8 
1768 
1769 
177G OOS6S& O00004 
1234 OOS&E0 012737 
177 
1773 
1774 OOS666 005077 
1775 oO0S&67e 00S077 
152 76 77 
7 04 is) 
i778 9057 
0 
toa Boe5T8 Borate 
1781 
1585 7 77 
00S7i I 
i38q p9251€ 277 
1785 
1786 
1782 
17 00S724 052777 
1789 005732 Ole7 
1790 736 77) 
1791 744 316 
1s fats Tas | Reise? 
1794 poeee 177 
133e 00S76C 012677 
1797 005764 005737 
1798 005770 001004 
1230 00$77e 105766 
160 
1 OOS77& 100401 
i180e 
1803 
oo060cc 10490 


od 
a@adcd 
QOoo 
cono 


mAcyiL 
*T7ESt 


173520 
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173504 
173502 
000011 
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001126 
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DOS 
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IF MODE i 


;CLEAR THE CLOC+ 


+s SRESSSSSSSSSSFASSSSFLASKESSSSFLESAFSSSSSSS FLESH SSSA SS SS SSF SHS S 


#TEST THE ABILITY OF CLOCK TO COUNT AT IMHZ RATE 


THE CLOCK’S ABILITY 


» PORDESRREREERESREEREEESSREONSDESNENESnEDNSEEDDESSE9900000800008 


THAT GO BI? DOES NOT CLEAR ON OVERFLOW, 
i$: CLR aAsR 
i eTES St 35 
:#THIS TEST TC TEST 
HetBolk af> Pas ange To TES 
hres SCOPE 
MOV aS, STIMES 
tk Bee 
MOV sB1TO! 10, ASR 
CLR R 
1$: N R 
bne OS 
MOV JASR,-(6) 
Bte Piisiaeaet ta 
er WHE 
64S: BIS epite, anor 
C (SP) 
B 64S 
TST (SP )+ 
MOV QABR , SBDDAT 
MOV (6)+. 9ASR 
TST SBDDAT 
BNE 2s 
TSTB -2(6) 
BMI 2s 


; ; SSSSSSSSSSSSSSSSSSSSSSSS >> 
ERROR 6 


;;00 S ITERATIONS 


CLEAR P 


Stan pees? 


“ROW WELL 68 
mn AMOUNT TO APPROXIMATELY 
37 MS. 


3 “-ROCLK~ 
{SEY MODE 3 apis INTR OSC NO RATE 
ONE IN 
:ZOROER” TO. Hint MEER OUNTER 
z GENERATE ON ste PULSE 
GENERATE 


;7EIGHT ST1 PULSES 


37 RESET STACK 

Beet ious couttene 

7 

+ CONYEN BRE IN SBDDAT. 
ORE CSR 


;7REST 

Ae NEXT TEST. 

;7AT HIGH RATE MAY oes Ba ove toe 
3 “NOTE: CSR HAD BEEN PUT Of STA 


;7NEXT TESt IF OVERFLOW. 


ERROR << <$S$S$SESSSSSSSSSSSSSSSSSSSSSSSSESS 


5 7EL ORK Paleo TO COUNT AT 
; “RATE: LMHZ 


RODED, RATE: IMHZ 
TLE DELAY. THIS DELAY 


EOS 


NOEC- 1-DVMINC=8 MACYLI 27(654) 27-DEC-77 09:32 P 38 
OVRNEE MNCA 73s #TESt THE ABILITY OF CLOCK 93 COUNT gf 1MHZ RATE 
: : SSSSSSSSSSSSSSSSSSSSSESSS>>> ERROR <¢ SSSSSSSSSSSSSSSSSSSSSSSISSSSESS 

1811 
18l¢ 006002 O0SO7? 172370 23: CLR JASR ;/CLEAR THE CLOCK. 
isie 
1816 LFERSe TERR ERROR Ree e OTE RAILITY OF CLOCK TO COUNT AT JOOKM2 RAT 
1817 i ETESt 36 #TEST THE ABILITY OF CLOCK TO COUNT AT IOOKHZ RATE 
1819 
1820 :ATHIS TEST IS DESIGNED TC TEST THE CLOCK’S ABILITY 
iBel i *TO COUNT AT 100KHZ2 RATE. 
1823 es FSSSESSSSSEKESEKRKSSAESSSRASSAESSSSSRSSHSSESARFSSSSSSS ESS SFFSSSSS HS 
1824 0060 oooo004 t$736: SCOPE 
182s 006010 612737 oO000S 001160 MOV aS, STIMES ;;D0 S ITERATIONS 
1827 
1828 006016 005077 173354 CLR aASR ;/CLEAR CLOCK 
1829 006022 005077 173352 CLR dABR :/CLEAR PRESET BUFFER 
1830 006026 012777 OGOD02! 173342 MOV #81T0!20, 3ASR ar CLOCK, MODEO, RATE: 1OCKHZ 
1831 006034 905000 CLR RO /NOW WE’LL DO A LITTLE DELAY. THIS DELAY 
1832 006036 o0S2c0 1S: INC RO aes AMOUNT TO APPROXIMATELY 
1634 D06040 001376 BNE 1$ :/369 MS. 
1836 ; 7-ROCLK- 
1837 O06042 O17746 173339 MOV JASR, -(6) :/SAVE CSR 
1838 oCO604G 952777 OGO4O0? 173322 BIS #4007, JASR :/SET MODE 3,DIS INTR OSC NO RATE 
1839 :/THIS MUST Do N 
1840 ZR R TO XFERR COUNTER 
i841 :/TO BUFFER ST 
i842 006054 052777 001000 173314 BIS agIT9 SASR 3 /Genenar ON ST2 PULSE 
1843 006062 Ole746 O00010 MOV -(Sp /NOW GENERATE 
1844 O06066 052777 OO00400 173302 64S: BIS aBite, SAR 
184S 006974 005316 DEC (SP abet ST1 PULSES 
1846 006076 001373 BNE bas. 
1847 006100 905726 TST (SP)+ ; /RESET STACK 
1e4g 006102 017737 173272 001126 MOV JABR, SBDDAT | “BREW IOUS PRESET BUFFER, 
18SO 006110 012677 173262 MOV (6)+, 9ASR : “CONTENTS ARE IN SBDDAT. 
1851 006114 005737 OOlie2E TST S$BDDAT : (RES TORE CSR 
18S2 006120 001004 BNE 2s “YES - NEXT TEST. 
1853 O06le2 105766 177776 TSTB -2(6) :/AT HIGH RATE MAY HAVE Hao OVERFLOW 
1854 :/NOTE: CSR HAD BEEN PUT ON STACK. 
1BSs 006126 190401 BMI 25 :/NEXT TEST IF OVERFLON. 
1857 


; ; SSSSSSSSSSSSSSSSSSSSSSSS> >» ERROR < << $S$SSSSSSSSSSSSSSSSSSSSSSSSESSESS 


1860 006135 104906 ERROR & ;/CLOCK FAILED TO COUNT AT 
ise ; “RATE: LOOKHZ 


MAINDEC-11-DVMNC-8 MACY11_27\654) 2@7-DEC-77 09:32 PAGE 39 
OVMNCA.F Li T36 #TEST THE ABILITY OF CLOCK TO COUNT AT LOOKHZ RATE 


;  SSSSSSSSSSSESSSSSSSSSSSSS>> >» ERROR «+  SESSSSSSSSSSSISSSISESSSSESISSESSS 


1865 
Ht +4) 006i3e OOSO7? 173240 2s: CLR aASR ;/CLEAR THE CLOCK. 
4, 
1870 ;EFEAERESRELESEESESESAELA SE SESE SESE SESS ESSERE SESE SES ESSE SES ES SS 
1871 :STEST 37 *TEST THE ABILITY OF CLOCK TO COUNT AT LOKHZ RATE 
1873 
1874 isTHIS TEST IS DESIGNED bia tEST THE CLOCK’S ABILITY 
Ht 44 *#TO COUNT AT 1OKHZ RATE 
1877 » PEPER ERESEE EER EREREREREREEEEREEESERS SEE SES ESSE ESR ESS ESSE ESE EES 
1878 006136 o00004 +6137: SCOPE 
4 006140 012737 ooooo0s 9001160 MOV aS,STIMES ;;00 S ITERATIONS 
1881 
1882 006146 005077 173224 CLR dASR ;7CLEAR CLOCK 
1883 O0061Se 005077 173e22 CLR @ABR : /CLEAR PRESET BUFFER 
1884 006156 012777 OO0031 173212 MOV #BITO!30,adASR :/ST ART CLOCK MOPEO, RATE: 1OKH 
1885 006164 905000 CLR RO :/NOW WE*LL DO @ LITTLE DELAY. furs DELA’ 
1887 OO06166 9005200 18: INC RO ;/7WILL AMOUNT TO APPROXIMATEL*® 
ites 006170 001376 BNE 1$ 37369 MS. 
1896 ; 7-ROCLK- 
1891 006172 017746 173200 MOV @ASR,-(6) : “Save CSR 
1892 006176 052777 o04007 173i7e BIS #4007, a@ASR “eat MODE 3,DIS INTR OSC NO RATE 
1893 i7 THIS MUST BE DONE IN 
to 40 R TO "ON-8T  veanitien 
/ 

1896 006204 052777 OO1000 173164 BIS ie oon GENERATE ON ‘oi st 3° PULSE 
1897 O06el2e Ole746 OO00010 MOV -tSp 5 NOW GENE 
1898 006216 052777 OO0400 173152 64S: BIS aBita, SASR 
1899 O06e2e4% 005316 DEC ;/7EIGHT ST1 PULSES 
[301 boesse poste oi eas RESET STACK 

P+ 37 
ios OO062e3e 017737 173142 OO01126 MOV JABR, SBDDAT a ORV IOUS rt atta 
1904 012677 173132 MOV (6)+,aASR : CONTENTS ARE IN SBODAT. 
1905 005737 001126 TST SBODAT ; “REST ORE CSR 
1906 O06eS50 001004 BNE es YES - NEXT TEST. 
13907 OObeSe 105766 177776 TSTB -2(6) iat HIGH RATE MAY HAVE HAD OVERFLOW 
i908 i “NOTE: CSR HAD BEEN PUT ON STACK. 
1303 O06e56 i190401 BMI es /NEXT TEST IF OVERFLOW. 
i9i1 


; ; SSSSSSSSSSSSSSSSSSSSSESS >» ERROR << « $S$SSSSSSSSSSSSSSSSSSISSSSSSSSSS 


$14 906260 104506 ERROR 6 7E.0GK aol TO COUNT AT 





GOS 


MAINDEC-11-DVMINC -6 MACYL1 27:654! 27-DEC-77 09:32 PAGE 40 Pa, 
DVMNCA.P LL 137 eTEST THE ABILITY OF CLOCK TO COUNT AT 1OKHZ RATE seG cose 
;  SSSSSSSSSSSSSSSSSSSSSEEES> ERROR © SESSSSSSSSSSS55SSSSS55555555535 
1919 
i380 006262 O0S07? :73110 23: CLR aasr CLEAR THE CLOCK. 
1355 
13924 PERS FESESSESEESSESASRASS SSS SLAF SESE FSSSSSSFHSSFFSSHSSH SHES SSI HSS * 
igs I eTEST 4O #TEST THE ABTLITY OF CLOCK TO COUNT AT IKHZ PATE 
1927 
1928 isTHIS TEST IS DESIGNED TC TEST THE CLOCK’S ABILITY 
iges *70 COUNT AT IKHZ RATE. 
1931 jtsverenesessesserersrversesnessesennssrsssnsssnensesossseretes 
1932 006266 o00004 jit T40: SCOPE 
1333 006270 die737 o0000S 001160 MOV aS, STIMES ;;00 S ITERATIONS 
1935 
1936 006276 ocOSO77 173074 CLR JASR ;/CLEAR CLOC 
1937 00630e 005077 173072 CLR JABR : /CLEAR PRESET BUFFER 
1938 006306 O12777 OD0041 173062 MOV #BITO!4O,aAaSR :/START CLOCK, MODEO, RATE 
1339 006314 9005000 CLR RO :/NOW WE*LL DO A LITTLE DECAYS “rHIS DELAY 
1941 006316 o0S200 1S: INC RO ;/WILL AMOUNT TO APPROXIMATELY 
1g4e 006320 001376 BNE 1$ :/369 MS. 
1944 ; 7-ROCLK- 
194S 006322 017746 173050 MOV JASR, -(6) :/SAVE CSR 
1946 O0063e6 052777 GO4O07 173042 BIS #4007, JASR :/SET MODE 3,D0IS INTR OSC NO RATE 
1947 yi ahs BE DONE IN 
1948 ZQROER FEER ON 1 COUNTER 
7 
1950 006334 052777 O010°2 173034 BIS aBITS, JASR iG on sT2 PULSE 
1951 006342 012746 000010 MOV P) /NOW CENERS TE 
1952 006346 052777 OOO400 173022 64s: BIS agite, JASR 
1953 006354 005316 DEC ean ST1 PULSES 
1954 006356 001373 gas 
1955 006360 005726 TST (SP)+ ; RESET STAC 
1356 006262 017737 173012 oO01126 MOV JABR , SBDDAT :/READ THE PRESET BUFFER, 
2 / 
1958 006370 012677 173002 MOV (6)+, JASR : /CONTENTS BRE IN S$BDDAT. 
1959 006374 005737 OOli26 TST $BODAT i /RESTORE CSR 
1960 OO06400 001004 BNE 23 YES - NEXT TES? 
1961 OO&4O2 105766 177776 TSTB -2(6) :/AT HIGH RATE MAY HAVE HAD OVERFLOW 
1962 :/NOTE: CSR HAD BEEN PUT ON STA 
1363 C0640 100401 BMI 2s :/NEXT TEST IF OVERFLOW. 
i9€s 
: : SSSSSSSSSSSSSESSSS55S5ES>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
1968 O064i0 104906 ERROR 6 /CLOCK FRILED TO COUNT AT 
1363 RATE : LKH2 
P ee ee 


HOS 
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DVMNCA. FLL THO eTEST THE ABILITY OF CLOCK TO COUNT AT IKHZ RATE S&o 0089 
: : SSSSSSSSSSSSSSSSSSSSSESS> >> ERROR ««  SSSTSSSSSSSSSSSSSSSSSSSSSISSSESS 
1973 
1328 o0e4i2 OOsOTT 172760 23: CLR JASR ;/CLEAR THE CLOCK. 
igs 
1378  FESSESSEREREESSE eSSFSERSSKSSSSSFSSHSFSHSFSSSSHSSFSSSHSFSSSSHSFSSSHS 
i373 i eTEST 41 #TEST THE ABILITY OF CLOCK TO COUNT AT 1OOHZ RATE 
1981 
198e THIS TEST IS DES 1GNED Tc TEST THE CLOCK’S ABILITY 
1383 i #T0 COUNT AT 100HZ RATE. 
198s [tenePaaeeeeneeenevaneserssssssscunnasnonssensaersresesserseses 
1986 006416 ocO0004 iit TH COPE 
1387 006420 312737 OO0000S 001160 MOV aS, STIMES ;;D0 S ITERATIONS 
1989 
1990 006426 00S077 172744 CLR JASR ;/CLEAR CLOCK 
igs: Boesse Gueres 00081 172732 BoE HeFlorso,onmn SHRM SRSEE’ BUEEEP ore som 
rae 727 8 4 Sr $7 
1993 444 900 CLR RO Be TR een reo ROLE ELAS. THIS DELA 
1995 006446 905200 18: INC RO ia AMOUNT TO APPROXIMATELY 
1398 006450 001376 BNE 1$ :/369 MS. 
1938 O064S2 O17746 172720 MoV JASR,-(6) CAE CS 
e000 006456 052777 OO4O007 172712 BIS #4007, JASR | /SEY_MOE, 3,015 jure OSC NC RATE 
a 3/ 
2002 ; /OROER TO XFERR COUNTER 
2003 - :/TO UFFER ON STe. 
004 0064 4 2777 O01000 172704 BIS agIT9 aASR gM ant sT2 PULSE 
00s 472 012746 OdO0001 MOV -'sp /NOW GENERATE 
2006 006476 052777 OOO400 172672 64S: BIS asite, SASR 
2007 OO06504 9005316 DEC (SP pam ST1 PULSES 
20 006506 001373 BNE bas 
2009 O06510 9005726 TST (SP)+ ;/RESET S 
3010 006512 017737 172662 GOli26 MOV JABR , SBDDAT READ THe "PRESET BUFFER, 
of 
2012 O06S20 012677 172652 MOV (6)+,aASR i CONTENTS ARE IN SBODAT. 
2013 006524 005737 O0l1l26 TST S$BODAT : “RESTORE CSR 
2014 006530 001004 BNE 2s i (YES | ~ sa he 
2015 O06S32 105766 177776 TSTB -2(6) GH RATE. Ray HAVE HAD OVERFLOW 
2016 t ONOTES CSR HAD BEEN PUT ON 
e017 G06S26 190401 BMI 2s :/NEXT TESt IF OVERFLOW. 
20193 


; ; SSSSSSSSSSSSSSSSSSSESSSES >» ERROR << ( $$SSTSSSSSSSSSSSSSSSSSSSSSSSTSS 


2022 O0BE4O 104006 ERROR 6 “CLOCK FAILED TO COUNT AT 
e2e3 RATE: LOOHZ 


20e7 

edes d0bS4e 
20e9 

2030 

2031 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

203 

2040 O06S4S 
2041 O06550 
204e 

2043 oo06S556 
2044 

204s 

2046 O06564 
2047 

e04s O0&SEE 
2049 O0657e 
2050 006576 
2051 006604 
20Se 

2053 oO06806 
20S4 006610 
2oss 

2056 

2057 oO0&ble 
e058 Oo06616 
20s3 

2069 

2061 

2062 O066 
2063 006632 
2064 OCbE 
2065 O06644 
2066 O06646 
2067 OO66S0 
2068 O66 
2069 : 
2070 oO06660 
2071 QO066E4 
207e 096670 
2073 Ocbé7e 
2074 

2075S 006676 
ec7é 

2077 


o0s07” 


000004 
Ole737 


005200 
001376 


017746 
052777 


017737 
012677 


105766 
190401 
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#TEST THE ABILITY OF CLOCK TO COUNT AT 100HZ RATE 


172630 


ooc00s 
0190000 


172604 
172602 
06007 : 


172560 
004007 


001000 
000010 
000400 


172Se2 


172512 
001126 


17777 


061160 
1723584 


172572 


1725S2 


i72S44 
172S22 


00ile6 


IOS 


27-DEC-77 09:32 PAGE 4 
;  SSSSSSSSSSSSSSSSSSSSSSSS >» 


es: CLR @ASR 


ERROR </  SESSSSSSSSSSSSSSSESSESSSISESESES 


;/CLEAR THE CLOCK. 


+ SEKESRSSESESSSEFSSSFSSSSSESSAERSSAFSSRSS SS FSSHFFSFSSSLSE SES FRS FS 


LeTEST 42 


*TESt THE ABILITY OF CLOCK TO COUNT AT LINEFREG RATE 


:sTHIS TEST IS DESIGNED TC TEST THE CLOCK'S ABILITY 


*#TO COUNT AT LINEFREG RATE. 


1 ceuensnonaeunabinnnsnseenaanetaeianmnanamnans 


*ST42: SCOPE 
MOV eS, STIMES 


BIT #BIT12,aSWR 
BEQ TST43 
CLR JASR 
CLR JABR 
MGV #8170!70, ASR 
CLR RO 

1$: INC RO 
BNE 1$ 
MOV JASR, -(6) 
BIS #4007, JASR 
BIS aBIT9, GaSe 
MCV 

64S: BIS weit, SASR 
DEC 
BNE gas 
TST (SP)+ 
MOV JABR , SBDDAT 
MOV (6)+,3ASR 
TST $BDDAT 
BNE 2s 
TSTB -2(6) 
BMI 2s 


; :SSSSSSISSSTSSSESSISSESSS 





» ERROR < 


;;00 S ITERATIONS 
; SHALL _WE TESt 
;LINE FREG? 

; SW Wie=1 

;“CLEAR CLO 


; CLEAR PRESET BUFFER 
MODEO, RATE:LINEFREG 


:/START CLOCK 
:/NOW WE°LL DO A LITTLE DELAY. THIS DELAY 
:/WILL AMOUNT TO APPROXIMATELY 
:/369 MS. 
ion ce 
; “SAVE CSR 
MO NO RATE 


/SET MODE 3,DIS Eure osc 
‘THIS MUST N 


E DON 
:/ORDER TO xFERR COUNTER 
:/TO BUFFER ON ST 

: “GENERATE ‘am ST2 PULSE 
:/NOW GENERATE 


; “EIGHT STi PULSES 


; “RESET_STACK 

;/READ THE ot BUFFER, 

:/PREVIOUS COU 

; “CONTENTS ARE IN $BOCrRT. 
i “RESTORE a 


:“YES - NEXT TESt 
:/AT HIGH RATE MAY HAVE HAD OVERFLOW 


: ‘NOTE: CSR HAD BEEN PUT ON STACK 
: ‘NEXT TEST IF OVERFLOW. 


‘SSTSSSTSSSESTISESSSSSISSSITSIFS 





11-DVMNC-A 
ii THe 
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27-DEC-77 


,J9S 


eae oy LINEFREQ RATE 


rurorurolforurelfururorururururulfurururoforurururofururfururururu 
b= be 0 be be be he ee ee be ee he be be ee eo CI) 


Re oe Ure £ur-O SR UR EDS 
ONOWM LW OWONOU SWl-OWON WhrO 


ror 
ose 
qa 


nie. 


STEST THE ABILITY OF CLOCK $3 2 unt 
799 104 RROR 6 /CLOCK FAILED TO 
_— . RATE: LINEFREG 
: : SESSSSSSSSSSSSESSSSSSESS ©» ERROR « «  SSSSSSSSESTESSSISSISTSSTISSSSESS 
006702 oOsoT? 172470 23: CLR aASR :/CLEAR THE CLOCK. 
« RSSSSSSSSSSSESESSESRSESEFSSSFSSSSSSHFSSSSSHKRSSSSHRSSHSSFSSSSESH SSS 
eTEST 43 *#TESt THAT COUNTER DOESN'T COUNT WHEN “SLAVE IN RATE IS SELECTEL 
= SSSSSSSSESESSSRSSSSSSSSESSSSSSASSSSHFSSRHSSHSSFSFSFSSFLSSSF SSP LAS 
006706 900004 #6143: SCOPE 
006710 012737 oo00ed CcOi160 MOV #20, $TIMES ;;DO0 20 ITERATIONS 
006716 OOSO77 172454 CLR dASR ;CLEAR CSR 
006722 005077 172452 CLR aABR : CLEAR PRESET BUFFER. 
006726 0S2777 o00001 172442 BIS #8IT0,adASR ;SET GO BIT, RATE:"SLAVE IN 
006734 OS2e777 oOOONYOO 172434 gis #8178, 3ASR ;GENERATE A MAINTENANCE ST). 
006742 o0S000 CLR RO 
006744 o0S200 18: INC RO ;NOW DO A SHORT DELAY. 
006746 001376 BNE 1$ 
+ <RDCLK= 
006750 O17746 172422 MOV JASR, - (6) ; “SAVE CSR 
006754 052777 OO4O007 172414 BIS #4007 , JASR i 73 MODE 3 DIS, INTR OSC NO RATE 
HIS MUST BE D N 
“ORDER TO xX FER OOS UNTER 
2770 O BUFFER 
006762 O0S2777 OO1000 172406 BIS agIT9 DASR : “GENERATE on” ste PULSE 
006770 Ole746 OO00010 MOV -{sp :/NOW GENERATE 
006774 052777 OO00400 172374 64S: BIS azite, SASR 
007002 005316 DEC (SP ;/EIGHT ST1 PULSES 
7004 001373 BNE Eas 
007006 00572 TST (SP)+ ; “RESET STACK 
007010 017737 172364 001126 MOV JABR, SBDDAT PREV 1008 PRESET BUFFER, 
007016 012677 172354 MOV (6)+,3ASR “CONTENTS ARE IN SBODAT. 
00702e 005737 O0112 TST $BDDAT RESTORE CSR 
007026 001003 BNE 2s :IF ANY COUNT, ERROR 
007030 105777 172342 TSTB JASR CHECK FOR OVERFLOW 
907034 19090003 BPL 3$ :IF NO OVERFLOW, NEXT TESt 
007036 005037 001124 23: CLR $GDDAT ;CLEAR FOR TYPEOUT, EXP’D ZERO. 
; ; SESSSSSSTSSSSSSSSSESESSS> >> ERROR <<< $SSSSSSSSSSSSSSSSSSSSSSSSATSSES 
DO7042 10401: ERROR 11 :CLOCK COUNTED WHEN RATE:“SLAVE IN” 


:WAS SELECTED. 





KOS 
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DVMNCA.F il T43 sTESt THAT COUNTER DOESN'T COUNT WHEN “SLAVE IN” RATE IS SELECTED 
2133 

: s SSSSSSSSSSSSSSSESSSSSSSS> >> ERROR << (SSSSSSSSSSSSTSSTSSSSSSSISESTE SE 

giz 007544 O0S077 172326 33: CLR @JASR ;CLEAR CLOCK’S CSR. 
2138 
2139 5p RRERREREE SEER EE EE CE REA EELS EEE SEER SEER ES EPS SES SESE SESE REET DEES 
2140 ;#TEST 44 #TEST THAT THE CLOCK WILL COUNT IN MODE 1 
2141 + EESESESEESESESESESEEEEE SHEE SSSS ESSE SEERESE RSLS SERRE SESS SESE SSDS 
eive 007050 oc0004 tST44: SCOPE 
e144 o0070Se 9o0S07 172320 CLR easR ;CLEAR THE CSR. 
2214S O00O70S6 O1e777 177777 172314 MOV #-1, ABR ;PRESET BUFFER REG. 
2146 064% O05e77 oc0o0oi3 172304 BIS #13,a9ASR ;START CLOCK,RATE:1 MHZ,MODE 1. 
2147 007072 o0S000 CLR RO 
2148 007074 i0Se00 iS: INCB RO ;NOW DO A SHORT DELAY SO _.HAT THE 
te 007076 901376 BNE 1$ sClOCK CAN COUNT TO OVERFLOW. 
eisl 007100 108777 i72272 TSTB @ASR ; OVERFLOW SHOULD HAVE SET. 
sips 007104 160401 BMI es ;GOTO NEXT TEST IF SO. 
21s4 


: : SSSSSSSSSSSSSSSSSSSSSSSS> >» ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSESISS 


2157 007106 104006 ERROR 6 ;CLOCK FAILED TO COUNT UP AND SET 
size ; OVERFLOW IN MODE 1. 
:  SSSSSSSESSSSSSSSSSSSSSSS>> > ERROR << <S$$SSSSSSSSSSSSSSSSSSSSSSSSSTSSS 

eige 067110 : 
ets Bho _ 
e164 
2i6s -SBTTL # 
2166 -SBTTL #PHASE 4 CLOCK INTERRUPT TEST. 
2167 -SBTTL # 
2i68 
21693 
2170 5 REESE ERERRR RARE EERE REESE ERE EERE EERE EEE EEE HEE EE EE EEE Tt 
e171 ; TEST 4S #TEST THAT THE CLOCK WILL INTERRUPT ON OVERFLOW 
e172 +s FREES ERRESEEESERERSLAEAASHAERSLAEAELFLAAAEFLSLSFLHSSHRARSSHS SEES 
2173 007110 900004 +6745: SCOPE 
siz2 O0711le Ol1e737 oOoCoe20 001160 MOV #20,STIMES ;;00 20 ITERATIONS 

rs 
2:76 
e177 007120 012746 GO00340 MOV #340,-(SP) ;PUT PRIORITY ON STACK. 
e178 007124 Ole74% 007132 MOV #64$,-(SP) ;PUT RETURN ADDRESS ON STACK 
2179 9007130 od000e RTI ;00 AN RTI, PUTS PRIORITY IN CPU. 
5i80 007132 64S: 
ei8e 007132 005077 i72240 CLR wASR ;CLEAR CLOCK’S CSR. 
at 007136 012777 177777 172234 MOV #-1,a0AGR ;SET PRESET BUFFER TO ALL ONES. 
2185 9007144 012777 000161 172224 MOV #161, aASR ;START CLOCK, RATE:ST1. 
eieé CO07iSe O0Se777 O00400 172216 BIS #81T8, JASR :GENERATE A MAINTENANCE STL. 


LOS 
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DVMNCA.P1l ™ *#TEST THAT THE CLOCK WILL INTERRUPT ON OVERFLOW 

2197 007160 O12777 OO7220 172214 MOV #1$,dVECTL :SET INTERRUPT ADOR. 
2189 007166 012746 oGO0000 MOV #0,-(SP: :BUT PRIORITY Len SIACr . 
2190 OO7172 Ole746 007200 MOV #65$,-(SP) ;PUT RETU ESS STACK 
2191 007176 900002 RTI :DO AN RTT PUTS PRIORITY IN CPL. 
se 007200 6S$: 
513s 007200 oo002e40 NOP ;STALL TIME 

198 007202 oO12746 000340 MOV #340,-/SP) ;PUT PRIORITY ON STACK 
2197 9072068 Ole74e 007214 MOV #66$,- (SP) : PUT Rel 8 BOORESS ON TACK _ 
¢138 007212 o0000e RTI :D0 AN R IORITY IN CPU. 
€193 007214 66S: 

: | SSSSSSSSSSSSSSSSSSESSSES>>> ERROR << $$SSSSSSSSSSSSSSSSSSSSSSSSSSSSE 
2203 007214 104007 ERROR 7 ;CLOCK FAILED TO INTERRUPT. 
. ; SSSSSSSSSSSSSSSSSSSSSESS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSS5SS5 
2207 007216 oD00402 BR Zt 
2208 007220 1$: 
2203 007220 O6e706 >cD0004 ADD #4. SP - /AD “4 TO STACK POINTER. 
2210 007224 005077 172146 2s: CLR aasr ;CLEAR THE BP otk 
geil 007230 013777 OO1404 172144 MOV VECTP, VECTL :2 FPS TORE VECTOR. 
2213 ; jtagecusenenaquassaqesoor*ereror tau mam inneet 
2214 PETES 46 #TEST THAT ST2 WILL CAUSE AN INTERRUPT 
221s 7 eh oe annndeene tnanananbaneertionnbenenussnnbannanneseenseees 
2216 007236 oo00004 +éT4e: SCOPE 
Pat 
2219 007240 O12746 000340 MOV #340,-(SP) ;PUT PRIORITY ON STACK 
geen goveus O1e746 007252 MOV #64$,-(SP) PUT RETYEN 8 DORE SS ON 73 AgK 
1 7250 RTI 'D0 AN R IORITY IN CPu. 

gece 007252 64S: 
2224 007 72120 CLR AR CLO 
555¢ Gossee Bisee> baS4se 172122 MOV 18 ay iCEEAR tN TERRUPY VECTOR. 
2226 007264 012777 040001 172104 MOV Bit WfBrTO, @ASR: SET SENT 2" O BIT 
eee? 007272 777 001000 172076 BIS $8179, aasR :GENERATE A’ MATN TENANCE ste. 
2229 007300 012746 o00000 MOV #0,-(S ;PUT PRIORITY ON STACK 
2230 007304 012746 007312 MOV #&5S, Fee) PUT RETURN ADORESS ON STACK 
2231 007310 d0000e RTI 'DO AN RTI, PUTS PRIORITY IN CPU. 
gcse 007312 6S$: 
ee34 007312 o002e40 NOP ;STALL TIME 
2236 007314 012746 000340 MOV #340, -(SP) ;PUT PRIORITY ON STACK 
2237 007320 012746 9007326 MOV #66$.-(5P) :PUT RETURN ADDRESS ON STACK 
2238 007324 o0000e RTI DO AN RTI, PUTS PRIORITY IN CPU. 
e239 007326 66S: 


OS 
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DVMNCA. P11 T46 #TEST THAT ST2 WILL CAUSE AN INTERRUPT 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2243 007326 104007 ERROR 7 ;CLOCK FAILED TO INTERRUPT ON STe. 
:  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSS55 
2247 007330 oo0402 BR 2s 
seus Ope eae 4 om aD 4 SP #4 TO STACK POINTER. 
es ? 
g823 eked BeE5gs eget 23: CL Sask ar clock’s CSR. 
ees! 067342 013777 OC1410 172036 MOV VECT2P, avVECT2 :S EPS TORE VECTOR. 
S523 : [SEERA RS ARR e eT Ice cause AN INTERRUPT 
q tkTE *#TEST THAT ST1 WILL CAUSE AN INTERRU 
cess iisieeapaenacansenansenesannenanssusenensemenanseneesesenserens+ 
ee5e 007350 oo0004 $74 SCOPE 
2258 7 74 40 MOV 4 P PRIORITY_ON STACK 
ue #34Q0,-(SP) ‘ 
SSeq Basses BiSsue Bb9329 Moy = BedBT = C8P) iBUT RETORN ThobREes ON’ STACK 
2261 00736e o00002 RTI Dd AN RTI, PUTS PRIORITY IN CPU. 
gees Bho Se4 77 1720 wae? oa 
Ssed D073 B93 77 basage 172010 MOV aoe av ECTe 3 CLEAR. CR VECTOR. 
gees 007376 052777 O40400 171772 ee rs sartiseG178, JASR’ ;2 inTR. ENABLE AND STi 
2267 007404 012746 o00000 ' Mov -(SP) ;PUT PRIORITY ON STA ck 
2268 007410 O1e746 007416 MOV sees, CSP) :PUT RETURN ADDRESS ON STACK 
2269 007414 00002 RTI :DO AN RTI, PUTS PRIORITY IN CPU. 
gero 10741 6S$: 
ee7i C 107416 oo0240 NOP ;2 INTR. FROM HERE. 
2273 007420 012746 000340 MOV #340,-(SP) spur PR ORITY 
e274 7424 012746 007432 MOV #66$'-(5P) an AD Rees ON TACK 
75 7430 000002 RTI . BT ane R PUTS BRIORITY IN CPU. 
e276 007432 66S: 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <$$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2280 007432 104007 ; : Tl. 
gee0 907432 104007 ERROR 4 ;2 CLOCK FAILED TO INTR. ON ST1 
5583 OD74SE 062706 00000 — 
4 AD #4, SP : 2A #4 TO STACK POINTER. 
2284 007442 005077 171730 2s: CCR sage ;2 CLEAR , " —_— 
gees 007446 013777 OO1410 171732 MOV VECTeP,avEcTe ie RESTORE TTR. VECTOR. 
2287 .SBTTL # 
2e8e ‘SBTTL #PHASE S ADVANCED TEStING 
ecks ‘SBTTL # 


NOS 
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DOVMNCA.P11 TSO #TEST THAT THE “FOR” BIT WILL SET ON 2 ST2’S SEG O0ES 
2291 ; jSRESRESE EONS ROR ERTS TIE “FOR” BIT WILL SET ON 2 st2’s 
2292 ‘STE #TEST THAT THE “FOR” BIT WILL SET ON 2 ST2’S 
2233 fh 5 RL RR UL UL I 
coos 0074S4 000004 iter’ SCOPE 
e236 OO745E 905077 171714 cLR BASR ; START WITH CSR CLEAR. 
es . 

2298 eats pes 77 10 171702 BIS eorT3 30 JASR : Rafe THE 1ST ste PULSE. 
2299 007474 052777 001000 171674 BIS #BITS9, JASR :GENERATE 2ND STe P 
2300 ; THIS SHOULD CAUSE FR BIT TO SET. 
2301 007502 032777 O10000 171666 BIT sB1T12,9ASR :DIO FOR BIT SET? 
e302 007516 001007 BNE 1$ ;YES-THEN NEXT TEST. 
2304 007512 017737 171660 001126 MOV JASR, SBDOAT -RECORD CSR. 
6305 007520 012737 110001 001124 MOV eB1T1S!erTi2!e1Tb, $GDDAT ;RECORD S/B. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << « SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2309 007526 104001 ERROR 1 ;ERROR-“FOR” BIT FAILED TO SET ON 
2310 :ON TWO SUCCESIVE STe PULSES. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS»>> ERROR <<< $SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2314 007530 
2315 g jeeeeoennaeunsonensersnseesssersseressecnsseensnessanensaysesess 
2316 iat #TEST THAT THE “FOR” BIT WILL SET ON 2 ST1’'S 
2317 jHeceenessennoennsinanennennanessnenennnaatsennansnanensneneness 
2318 007530 o00004 +éT5 SCOPE 
2319 
2321 007532 005077 171640 CLR BASR ;START WITH THE CSR CLEAR. 
5355 pozeus oO3s55 boasso 171626 ats seit fos, 3ASR fe Oe 
2324 007550 052777 O00400 171620 BIS #81708; JASR : GENERAT ANOTHER S 
2325 :AT THIS POINT THE So toR BIT SHOULD HAVE SET 
2326 007556 032777 O10000 171612 BIT sB1TL2, JASR :DID THE FOR BIT SET? 
5356 Oo 7eee 001007 171604 001126 nov aaSR SBDDAT RECORD CSR. 

MOV 

e329 007574 012737 012001 001124 MOV oT oTerTi2tBITO. $GDDAT ;RECORD S/B. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< $SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2333 007602 104001 ERROR 1 ;ERROR- “FOR” BIT FAILED TO SET ON 
S330 :TWO SUCCESIVE ST1 PULSES. 

; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSE 
2338 
2339 
e340 aerate ee eee eect THAT FOR BIT WILL SET ON TWO OVERFLOWS 
2241 iS TES *TESt THAT FOR BIT WILL SET ON TWO OVERFLOWS 
234e 5 SR, MO ok, 


+é152: SCOPE 


2343 907604 900004 
2737 o00002 001160 MOV #2, STIMES ;;D0 2 ITERATIONS 


e344 007606 O01 


53 
C7) 
36 
an 2 
wv 
a 


; 


R Saaeesierassses 


frurofu fury 
WW 


oo 
L£W 


furor 
WWW 


rururuorT 
WWW 
DNR | eo 
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i TS2 #TEST THAT FOR BIT WILL SET ON TWO a RFLOWS Seq Otee 
4 77 171556 CLR aASR fg WITH [resect CLEAR. 
12777 177777 171852 MOV 8-1, dAGF ELOAD BUF 
cbeb 777 600013 171542 Bis 813, aASR :ST Bock K ROOE i . IMHZ. 
76 (00 CL RO 3 Nou D9 Ay. 
36 200 18: INce Re DURING THIS S DELAY, THE CLOCK WILL 
THI SNSULB CA CAUSE i a FOR BIT TO SET. 
7642 032777 O10000 171526 IT #B1T12,9ASR :0 
Bosee 6001007 NE es 2 Fe, 
76 017737 171520 001126 MOV JASR, SBDOAT ;NO-RECORD THE CSR. 
BOT beS 012737 010213 Bt iss MOV 8010213, $GODAT + RECORD S/B8. 
:  SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSS .SSSSSSSSSS55 
007666 104001 ERROR 1 ;ERROR FOR BIT FAILED TO SET ON 
; TWO SUCCESSIVE LOWS. 
. | SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << «SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
007670 
5 [aueseesauanensnentsennasensersnerensenszenszeeasensnsesesss ees 
pitt #TEST THAT FOR BIT WILL CLEAR IF GO BIT IS SET 
jsnnotnuonunennantuennonsnesnsuenesenoetnaenneenaensasnsess3s++ 
007676 oco0004 +éT5 SCOPE 
007672 012777 1 171476 MOV #B1T0,3ASR ;CLEAR CSR,SET GQ. BIT. 
00 OSe 001000 171470 BIS #8179; JASR Ser ist S St2 Pub 
007706 052777 001000 171462 BIS 88179, dASR GENERATE 2ND ND px PULSE. 
007714 042777 100001 171454 BIC sectaresten, nant SEER GO BITAND ST2 FLAG 
007722 O0S2777 o00001 171446 BIS sB1T0,9ASR ;SET THE “GO” BIT AGAIN - 
:SHOULD CLEAR FOR BIT. 
007730 017737 171442 001126 MOV @ASR, SBDDAT ;READ THE CSR. 
007736 012737 100001 o01124 MOV #100001,$GDDAT ;RECORD WHAT CSR S/B. 
007744 032737 O10000 001126 IT egiTie 2, $B0DAT 010 FOR BIT CLEAR? 
0077S2 9001401 EQ i$ YES NEXT TEST 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
007754 104001 ERROR 1 ;FOR BIT FALED TO CLEAR 
:WHEN “GO” BIT WAS SET. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << ($$SSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
007756 00S077 171414 1S: CLR JASR ;CLEAR THE CSR. 
Pree erect THAT WE CAN DIGALE THE INTERNAL OSC 
i $TEST *#TEST THAT WE CAN DISABLE THE INTERNAL OSC 
Da enteterineemeel andl a es 


MAINDEC-11-OVMNC-A 


DVMNCA. 


Vey eye yyyy 
=38559900083 


oh pe be be be 


PEPE PE eer eee 
fo Ow VOU Eure 


Pil 


010144 
010150 


TS4 


ooooo4 
012737 
00S077 
00S077 


00$726 
017737 


ieg7s 
$737 


104011 


o00s077 


012700 
052777 


CO6 
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*TESt THAT WE CAN DISABLE THE INTERNAL OSC 


+s SSSRSSSSSSSSLSSFSSSSASSSHSSSSSSSFLSSFSHSFSSSSSSSSSSHSSHSSSS DSHS S 


;;00 S ITERATIONS 


;CLEAR THE CSR 
;CLEAR THE PRESET BUFFER 
;CLEAR EXPED. 


;OISABLE THE INTERNAL OSC. 
:START CLOCK:RATE 1MHZ. 


;DELAY A SHORT TIME. 


Ka 
ant OSt NO RATE 


IR En 
Aue RR COUNTER 
{-GSNERBTE ON sto" PULSE 


RIGHT ST1 PULSES 


{READ a a SET BUFFER, 


zy CONTER IN" SBD0AT. 
- aa - SR EXT TEST. 


; ; SSSSSSSSSSSSSSSSSSSSSSSS >> ERROR all ossasemenieemamananaieal 


;CLOCK DIS 


E A aaatama 
:0SC. DID NOT WORK 


;  SSSSSSSSSSSSTSSSSSSSSSSS>>> ERROR << < $SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


;CLEAR THE CSR. 


Leer e teeter EET THAT CLOCK CAN BE COUNTED USING MAINTENANCE 


titsy: ScoPE 
o0000S 001:60 MOV eS, STIMES 
171400 CLR aASR 
171376 CLR aABR 
001124 CLR $GOLAT 
004000 =171362 MOV #61T11,aASR 
000011 171354 BI Bice JASR 
L 
1S: INCB 
BNE 
171342 MOV JASR, -(6) 
004007 171334 BIS #4007, JASR 
00 171326 BIS #8179, JASR 
884808 MOV Hf 9188S 
000400 171314 64S: Bis egite, 3ASR 
BNE bas) 
TST (SP)+ 
171304 001126 MOV JABR , SBDDAT 
71274 MOV (6)+, JASR 
Oll26 TST SBoDAT" 
BEQ 2s 
ERROR 11 
171260 2s: CLR aASR 
TES 
+6 c 
171252 cLR JASR 
bo4680 171240 sre SB FF 
000011 171232 BIS aELISHBTTO, aASR 
177754 MOV #-20..RO 
009400 171220 1S: BIS ets afi 


*#TEST THAT CLOCK CAN BE COUNTED USING MAINTENANCE OSC 
se Ma NET aR prreen3" 


CLEAR THE C 

Ow Naw Bsc. 
ee" To  EOUNt 35 Otines: 

;2 GENERATE 1 MAINTENANCE OSC. 


;NOTE: AT_IMHZ, IT TAKES 10 
:MAINT. OSC TO’EQUAL 1 COUNT 


wt 


DO6 


MAINDEC-11-DVMNC-A MACYI1 27\6S4) 27-DEC-77 09:32 PAGE SO 
OVMNCA. Pil rss STEST THAT CLOCK CAN BE COUNTED USING MAINTENANCE 03¢ c€% onee 
2¥53 010156 p0se09 inc RO 00 20 MAINTENANCE OSC. 
% 01016 373 NE is 
Sués 
eyes 9101 77 71 MOV JASR, -(6) i RUE S 
sie— 818} 538 bCdEAS rience Bis 2080? o8eR +e eye SBE 3 DIS INTR OSC NO RATE 


3466 ROE RIND «FE PERRO ric UNTER 


74 777 «Og 171174 Ss H IT9, gASR ; “GENE st2- PULSE 
sigs B18hz3 88702 BR4808 abs BF AERIS 
2464 010206 052777 OOO400 i71162 64S: BIS ssite, 3ASR 
24bS 010214 005316 DEC $ see ST1 PULSES 
sve? Bibess Bbzee S (2. i RESET SI 
1 177 i711S2 001126 MOV 52BR° SBD0AT THE "PRESET BUFFER, 
3 PREV i Bae TN" 
470 019230 012677 171142 MOV (6)+ gAsr estore RTS IN $BODAT. 
471 010234 605737 001126 TST $BODA 
euze 010e40 00100: BNE 2s YES - NEXS Fest. 
¢ 
2474 
: | SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << <SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2477 010242 104011 ERROR 11 ;ERROR COULD NOT COUNT USING 
e478 :MAINTENANCE OSC. 
; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR <<< S$SSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
ese 010244 905077 171126 2s: CLR JASR ;CLEAR THE CSR. 
2484 
248s 
2486 
S182 pTESTteeteneeennsrertrne crock’: im? DIVIDER 
eee ATES *#TEST THE CLOCK’S IMHZ DIVIDER 
2490 . N THIS TE HE UT PART OF THE DIVIDER OGICc. 
e491 Then vBge “SEVERAL The Fe Ha? ARE USED To. 50 tHIS, TH dA Ae CHECKS 
e49e RAIN OSC PULSES GIVES US 1 . COUNTS AT IMHZ RATE. 
24393 sTHAT. 100,000 MAIN OSC PULSES GIVES US 10000, COUNTS Ar InHz Rat 
2494 010250 000904 paneee SCOPE 
e435 O10eS2 012737 oo00005 001160 MOV aS, STIMES ;;00 S ITERATIONS 
™ ra ; “-DIVCH- 
4 10260 012700 oo00012e MOV .,R : 
2499 Bi 64 005077 171106 CCR SASR ° 
2500 010270 005077 471104 — CLR dAGR 
4 ® ASR ABLE INTERNAL OSC. 
Seih BIBSG? Besrrs BBSET9 1748ce Big $541 Ree ERS RAE az toe 2. 
SOY 10210 7 34 1$: MOV #10000. Ri :/D0 THAT MANY TIMES 
sos p1e3tg G2g203 erate ate 71054 : S : € PUL 
Sere Rinsss Reon, 171054 2s: BIS aGIT8, . aASR : “GENERATE AN OSC PULSE. 


MAINDEC-11-DVMNC-A MACYL1 
OVMNCA.P 11 TS6 TES 
7 O1 137 
$26 Si03e6 Obs 
2509 010330 001367 
2510 Ol 777 901000 
2511 91 12700 900019 
e51€ 01 7 0400 
2513 010352 005300 
2514 010354 001373 
Ba 010356 017737 171016 
2517 010364 O1e737 Ge24e0 
2518 010372 Oe3737 001424 
2519 010400 001401 
2520 010402 104011 
2521 
eS2e 
eSea 
2504 
eSes 
2526 
2527 
ese8 
2525 
2530 
2531 
25 
2533 010404 900004 
2534 010406 012737 oD000s 
2535 
2537 010414 012700 o0001 
2538 010420 005077 1707Se 
2539 010424 005077 170750 
2540 010430 0527 40 
geti 010436 052777 O000e 
2543 O10444 012701 923420 
2544 O104S0 777 000400 
es4S 010456 005301 
e546 010460 001373 
2547 010462 0053 
2548 O10464 001367 
2549 010466 052777 00100 
e5SC 010474 012700 000010 
2551 010500 052777 060040 
255e 010506 0053 
2253 010810 001373 
eSSS 010512 017737 170662 
2556 010520 012737 001750 
2557 010526 023737 901424 
2558 010534 001401 
2552 O10S3e 104011 


27: 654) 
THE CLOCK’ 


171036 
171024 


001160 


170740 
170732 


170720 


170702 
170670 


E06 


7-DEC-77 09:32 PAGE Si 


3$: 


iMHZ DIVIDER 


es 
RO 


i$ 
#6179, aASR 
a8. 
seits,aasr 
RO 
3$ 


;7STe 


AD ¢c9 


; “RE if 
; “EXPECT HG SE MANY COUNTS. 
GET THEM?’ 


;/DID WE 
; “ERROR 


100,000 


OSC PULSES 


:/DID NOT GENERATE 190000. 
:/COUNTS AT RATE .MHZ 


- FEESEEEESEEES LESSEE EAERSSE ESSE SESE SESLAESHASSLSLSSESLES HERES SES 
*#TEST THE CLOCK’S LOOKHZ DIVIDER 


OF THE DIVIDER CHAIN LOGIC. 
TO DO THIS, THIS TEST CHECKS 
1000. COUNTS AT 1O0KHZ RATE. 


:#TESt S7 
;* 
:#IN THIS TEST 
:#THERE ARE SEVERAL 
:#THAT 100,000 MAIN OSC PULSES 
- - SERRESEE 
t$1S7: SCOPE 
MOV aS,STIMES 
MOV #10. ,RO 
CLR aASR 
CLR dABR 
BIS #BIT11,3ASR 
BIS &7!20, ASR 
i$: MOV #10000. ,R1 
2s: BIS #8178, aASR 
DEC R1 
BNE es 
DEC RO 
BNE 1$ 
BIS #81T9, JASR 
MOV #8. 
3$: IS #8it8, JASR 
EC RO 
BNE 3$ 
MOV JABR, SBDDAT 
MOV #1000. ,$TMPO 
CMP S$TMPO, $B8DDAT 
BES TST60 
ERROR 11 


WE WILL CHECH OUT PART 
ESTS THAT ARE 


U 
GIVES U 


SED 


S 


;;00 S ITERATIONS 
;7-DIVCH- 


;/STe 


SERREREEREEERSEESESSESES SS SEEEES SREEESS ESSERE ESE ES ESE SS 


;/DISABLE INTERNAL OSC. 


;/SET GO,RATE: 


100KH2. , MODE 3. 


;/DO THAT MANY TIMES. 
! GENERATE AN OSC PULSE. 


;“READ COUNT 


: VEXPECT THESE MANY COUNTS. 
:/DID WE GET THEM?? 


; “ERROR 
;/CIO NOT G 


100,000. OSC PULSES 
ENERATE 1000. 


— 


SEG 0069 


QO0000 AO0000000000 20000 


mrmod 


FO6 
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-DVMNC -6 aE 
TS> *TEST THE CLOCK’S I00KHZ DIVIDER 


s/COUNTS @T RATE 100KHZ 


FERRE SESE REESE SSSR EES ESESEES SESE SESELESEFFSHSSSSSES ODES EES SES ES 
: STEST 60 #TEST THE CLOCK’S iOKHZ DIVIDER 


SIN THIS TEST WE WILL CHECH oul PART OF THE DIVIDER gl US OGIC. 


; RE ARE SEVERAL T TO DO tHIS, THIS T $ 
i STHET 100, f MAIN O z Bul tes eived ste 180°°c SUAS at Lorne ghee 
WWwers bans One, ey Coe ert ees cebsescbonataononstinaaneneet 


oS40 g0g904 téte0: Sc 
OS4e 012737 ocooos 001160 MOV aS, STIMES ;;00 S ITERATIONS 
; “-DIVCH- 
10SS0 012700 ooo012 MOV #10. ,RO0 
10554 170616 CLR aASR 
1 77 170614 ¢LR aABR 
10564 052777 oO04000 170604 BIS #B1T11,aASR /DISABLE INTERNAL OSC 
10572 052777 000037 170576 BIS #7!30, ASR :/SET GO.RATE: LOKHZ. MODE 3. 
10600 012701 023420 1$: MOV #10000. ,Ri ;/00 THAT MANY TIMES. 
10604 052777 O00400 170564 2S: BIS aeiTe, aASR : GENERATE AN OSC PULSE. 
10612 005301 DEC Ri 
10614 001373 BNE 2s 
10616 005300 DEC RO 
10620 001367 BNE 1$ 
10622 052777 oO01000 170546 BIS #8179, JASR ;/$T2 
10630 012700 o00010 MOV #8..R 
10634 052777 O004N0 170534 233: BIS #3its,aasr 
10642 300 DEC RO 
10644 1373 BNE 3$ 
10646 017737 170526 001126 MOV JABR, SBDDAT ;/READ COUN 
10654 012737 000144 001424 MOV #100: ,STMPO :/EXPECT THe SE MANY COUNTS. 
10662 023737 001424 O01i26 CMP $TMPO; SBDDAT /DID WE GET THEM 
10670 001401 BEG TST6l tf 
10672 104011 ERROR 11 /YERROR 100,000. OSC PULSES 
DID NOT GENERATE 100. 
: COUNTS AT RATE 1OKHZ 
= SFESSSRESSSSSSRESSSSSSSRSSSSFSSESFSSEFSSSESSSSARFSSSSAHSPHSE SPH HS 
; BTEST T 61 *#TESt THE CLOCK'S I1KHZ DIVIDER 
: IN THIS TEST WE WILL CHECH OUT PART OF THE DIVIDER CHAIN LOGIC. 
*THERE ARE SEVERAL TES{S THAT ARE USED TO DO THIS, THIS Test CHECKS 
#THAT 100.000 MAIN OSC PULSES GIVES US 10. COUNTS’ AT IKH2 RATE. 
= a fA RY Al SS I Ft Ue ee Bad PR 
19674 900964 +6761: SCOPE 
10€7& Si2737 oo00DS 001160 MOY aS, STIMES ;;D0 S ITERATIONS 


&52 BBzCF 


R SISTeoASY 


O0000 
fava Dodd 
rLrod 


A ee ee ee eee 


ed ed ed oe! a | ae | 


TST a eT eT a ee ee ey ee 
uee ONN 
SMOF EVES 


OoO000000 20000 


GO6 


: cY¥11 27'654) 27-DEC-77 09:32 PAGE $3 
Tel *TEST THE CLOCK’S IKHZ DIVIDER 
-OJ CHe- 
0i2700 oo0001e2 Ov #10. ,R0 
77 1704%62 CLR aASR 
077 170460 €LR aABR : 
2777 4000 i704S0 BIS eGITi1,aASr ;/DISABLE INTERNAL_OSC. | 
777 900047 170442 BIS 87'40, 3ASR :/SET GO.,RATE: 1KHZ.,MODE 3. 
7 3420 i$: MOV #10000. ,R1 ; DO THAT MANY TIMES. 
B4g-94 B64 170430 28: Bis s81TS, JASR :/GENERATE AN ose Bai se. 
005301 DEC Ri 
001373 BNE 2$ 
005300 DEC RO 
001367 BNE i$ 
Ose777 001000 i704i2 BIS 88179, JASR :/ST2 
012700 900010 MOV #8. .R 
052777 O00408 170400 3s: BIS s8its, aasr 
905309 DEC RO 
i BNE 3 
017737 170372 oO1126 MOV JABR , SBDDAT ;/READ COUNT. 
012737 9000ie O014e4 MOV #10. $TMp0 : /EXPECT THESE MANY COUNTS. 
023737 001424 dO01126 CMP $IMPO, SBHDAT :/DID WE GET THEM?? 
001401 BEG TST62 ‘3 
104011 ERROR 11 ;/ERROR 100,000. OSC PULSES 


:7DID NOT GENERATE 10 
:/COUNTS AT RATE iKHZ 


5p ERERESEAASESSSELELELAELASHLAF SS SEA ES ELEFSLERE AEE LLSSREFFERE FH SSS 
. I&TEST 62 *#TEST THE CLOCK’S 100HZ DIVIDER 


;* 

;*#IN_THIS TEST MIbb CHECH OUT PART OF _T Ov TRER CHAIN LOGIC. 
;#THERE ARE SEVERAL TESTS THAT ARE USED TO DO THIS, THIS TESt CHECKS 
;#THAT 100,000 MAIN OSC PULSES GIVES US 1 COUNTS At 100HZ RATE. 
LESSEE EERE REREREEERER ERE EEEEE ESSE RESRES ES ES RHEE SELES SESE SESE 


ooo004 +ét62: SCOPE 
012737 oo000S on1160 MOV aS, STIMES ;;D0 S ITERATIONS 
3 /-DIVCH- 
012700 oo0o1e2 MOV #10.,RO 
005077 170326 CLR JASR 
nee bosan0 170314 she eBrtii JASR DISABLE INTERNAL OSC 
 ] : af = 
777 000057 170306 1s #7'SO, JASR :/SET GO.RATE: 100HZ. MODE 3. 
1270 23420 1$: MOV #10000. ,R1 :/DO THAT MANY TIMES. 
088777 state Mata 170274 ef: Bee tote, aASA : ‘GENERATE AN ose Bei se. 
001373 BNE 2s 
005300 DEC RO 
§o4367 001000 170256 Bye ‘ais JASR ste 
Pr > ; : Pr 
012700 o90010 MOV #2. RO 


HO6 


MAINDEC-11-DVMNC-8 MACYLI 27(654) 27-DEC-77 09:32 PAGE SY 
DVMNCA. PLE Tee #TEST THE CLOCK’S 100HZ DIVIDER 
iil 777 900409 i70244 3S: S e8178,aAS® 
ses Biiigs 300 ¢ RO 
e671 611134 00i373 BNE 3$ 
67 11136 017737 17 C1126 MOV aneR, S$BDDAT : /RE 
>4 Bits g12e32 beSe3e piise MoV seo EXPEC Nese MANY COUNTS. 
267S O111Se 023737 COl4e4 01126 CMP He SBODAT :/OID WE GET THEM? 
x4 +1168 1401 BES ss = 
-* Oilibe iD540i1 oR ;/ERROR 100 900, O88 PULSES 
267 :/DID NOT GENER i 
267 ; COUNTS AT Aad tC oduz 
2680 
2681 
6e 5 FEREFRESSEAFSLELELALAELSLESLALHSSALSLSLFLFSLSLALF SEAS SFSSSHSSSESSS 
ee84 i eTESt 63 #TEST THE CLOCK’S MODE 2 OPERATION 
c 


Z6Be He oFBS seas ashe rHODE 2, OPERATION 
Sebe i3s s THE COUNTER TO TQ BEGIN COUNTING FROM 
2690 a's one: THe COUNTER Ui Not CBr Paue Codmring AFTER 


2691 tS OVERFLOM. ae 7 "TRIGGER Fe 
2692 :# (WHEN ST2 GO G0 Ena ce ts a "3755 Remuees A TO 
2692 :#TRANSFER FROM THE COUNTER TO tHE 8 BUFFER/PRESET REG. 
cogs SMILE HE COUNTER CONTINUES TO RUN 
eb3é :#TO TEST THIS MODE, WE*LL DISABLE THE INTERNAL OSC AND USE 
536 | SEND INTENANCE OSC PULSES AS WELL AS A MAINTENANCE 

3 
2700 PTT TT ETTTTTTTTTTTTTTTTTTTITTTTT TT TTT TTT TT TTTTTTTTTTTiT TTT 
701 Di1ib4 900004 tite3: SCOPE 

a 11166 612737 o00020 001160 MOV #20,STIMES ;;DO 20 ITERATIONS 
hn 01117 905077 170176 cLR ASR ‘CLEAR The parser ae. 

SOP tis RG BOSC ee ABbGd 170164 aby aOR ask ER Te sth 
e707 Oliéle OSe777 o0000S 170156 BIS #S, JASR FART Ae oe MODE 2. 
e709 011220 912700 177776 1$: MOV a-2. ;SET TO GIVE 2 ST1 PULSES. 
2710 O11224 o00400 170144 2g: BIS sar78 DaSR : GENERATE AN STL PULSE 

oil Bile 2 05200 NC RO 
Sig (Ulless NE es ;IF NOT DONE 2 TIMES, LOOP. 
csie OT IBae S2777 70 _ 

°d 132 BIS H IT9, JASR ; HER AN ults HA BEEN GENERATED 
ats gi ise 875555 stefseiera 07134 MOV scbBn r ; THE p  pRecet BUFFER si S10 
e717 OlleS2 017737 i70li2e 9001126 MOV SAR :READ THE PRESET FFER 
2718 O112e60 023737 O011e6 001124 CMP Sa0DATe SCDDAT :DID A COUNTER TO SPRESET BUFFER OCCUR” 
e715 Olle6& O0140e BEQ 4d :YES - NEXT SUBTEST 

~ 


>; STSESSSTSSSESSSTISSSSSSSSS» © ERROR <¢ ( S$SSSSSSSSSSTESSSSSTSSSSESSSSTSESS 


MRINDEC-11-DVMNC-A 
OVMNCA.F1i 


C 763 
2723 011270 104005 
e7e4 
2725 
2726 O11272 oD04e7 
e729 
e730 011274 
2731 

732 011274 017746 
2733 011300 052777 
2734 011306 042777 
2735 011314 05277 
e736 011322 017737 
2737 011330 052677 
2738 011334 005737 
2740 011340 023737 
e741 011346 001401 
e742 
2745 011350 id490s 
e746 
aru? 
2748 
2751 011352 
e752 011352 042777 
2753 011360 005037 
2754 011364 052777 
2755 
2756 011372 017746 
2757 011376 052777 
2758 011404 042777 
2759 011412 052777 
2760 011420 017737 
e761 011426 052677 
gerbe lisse 005737 
2764 011436 O01401 
e7es 
2768 D11440 104001 
2765 
2772 

773 
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‘rc o-77 09:96 . 
TtESt THE CLOCK’S MO 2 OPERATION 
ERROR 


170076 
000005 


001126 
301124 


000070 
O001ie4 
000400 


001126 


170016 
170004 


167772 


001126 


; ; SSSSSSSSSSSSSSSSSSSSSSSS 


BR 
4$: 


Oo Aw I2OOOZ 
Wer Oreste O 
“WMC NOW< 


ov 


; : SSSSSSSSSSSSSSSSSSSSSSSS > 
ERROR 


;  SSSSSSSSSSSSSSSSSSSSSSSS 


Ss: 


4AWDZOoOOZ WOW 
OHOMHHO ref e 
AW<KMNOWK WMBO 


BEG 


; : SSSSSTSSSSSSSSSSSSSSSSES> >> 
ERROR 
; ; SSSSSSSSSSSSSSSITISSISSS > >» 


I06 


PAGE SS 


5 


ss 


aASR -(SP) 
sBtvis aase 
I R 


(SP)+,aASR 
SB0DA 


SGDDAT , SBDDAT 
S$ 


S 


#70, d9ASR 
$GDHAT 
#8178, aASR 
JASR,-(SP) 
8S 

#68tT1S, aASR 
s8ITS. JASR 
aABR, $B8D0AT 
(SP)+, JASR 
sBooat 


TST64 


1 


A COUNTER 10 PRESET QUFFER DID "07 
[HAPPEN PROPERLY 


ERROR «¢  S$SSSSSSSSTSSESSSSSSSTESSTISSSS 


{SAVE Cee CONTENTS. 
:/ Set 19 MODE 2, G0 
gees ste. PULSE. 


RESTORE Csr 
: “PREVIOUS CONTENTS OF COUNT REG 
/IN $BODAT. 

WAS THE COUNTER ACCIDENTLY ZEROED” 
NO - NEXT TEST 


> ERROR << <$S$SSSSSSSSSSSSSSSSSSSSSSSSSSE35 
THE COUNT REGISTER SHOULD NOT 
:HAVE BEEN EFFECTED BY THE Ste 


» ERROR <<< SSSSSSSSSSSSSSSSSSESESESESSSESE 


;CLEAR THE RATE BITS. 
:SEr AE oo 


ROCL 

/SAVE Ear contents. 

:e8N TO pegs 2,G 

:/CLR_ST_F 

: GENERATE ere PULSE. 

; “READ COUNT REG. 
; “RESTOR 
i PREVIOUS | CONTENTS OF COUNT REG 
37 IN SB80DAT 


ERROR < << $$SSSSSSSSSSSSSSSSSSSTSSSSSESSS 
;CLOCK COUNT REG SHOULD BE ZERO 
ERROR << < $$$SSSSSSSSSSSSSSSSSSSSSSTSESSS 


, PEF EEEE ERASE SESE RERERESSESEE ESSE ESSERE FEREESHESES HSE E HSE ETDS 
#TEST THE CLOCK’S MODE 3 OPERATION 


IeTES ST 64 


2:2 


JO6 


MA@INDEC-11-DVMNC-4 MACY11 27 es 6-77 09: PAGE Sé 
Ne es *Te4 StS? THE FL "ROBE 3° OPERATION 
2223 i#IN THIS Test WE*LL CHECK MODE 3 OPERATIC ; 
778 *#MODE 3 IS JUST L LIKE MODE | g Exckrt THT tHE COUNT 
$508 : #REG 15 ZEROED AFTER AN 
2781  ppecnebaceneenecncconcescesnencceccenennenecenssessesseocsssses 
vA 011442 900004 $ét64: SCOPE 
e783 011444 Ole737 GOOb2D 001160 MOV #20, $TIMES :;00 20 ITERATIONS 
2785 011452 905077 167720 CLR aASR ;CLEAR THE CSR 
2786 011456 5077 167716 CLR JABR CLEAR THE BUFFER REG. 
2787 O11462 O1e777 OOO0BO 167706 MOV #60, JASR ‘cee RATE: 
e788 011470 OSe777 OO0007 167700 BIS #7, JASR : START ceick: 1 MODE 3 
790 011476 912700 177776 1$ MOV 8-2. RO :SET TO GIVE 2 STi PULSES 
2791 O011S50e 052777 OGOOYOCO 167666 2S: BIs #8176, 3ASR : GENERATE AN ST1 PULSE 
2792 011516 o0S200 INC RO 
6733 01151e 1373 BNE 2s ;IF NOT DONE 2 TIMES, LOOP. 
55 Oiieis 052777 001000 167654 = BIS e179 JASR HERE'S st GGIE! AN ST2 HAS BEEN GENERGTES 
‘ Yew N q? oe 
2797 01152e Ole737 O00002 001124 MOV s$Gbo0AT Reset BUFFER SHOULD BE 2. 
27 011530 017737 167644 OOlle6 MOV abr $BDDAT RESO. The PRESET BUFFER 
2799 011536 023737 O01126 O01124 CMP BODAT,$GDDAT :DID A COUNTER To PRESET BUFFER OCCUR? 
2800 011544 O0140e BEG Mi :YES - NEXT TEST 
: : SESSSSSSSSSSSSSSSSSSSSSS> >» ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 
2804 oO11S4é 104005 ERROR 5S A COUNTER TO PRESET BUFFER DIO NOT 
280s ‘HAPPEN PROPERL 
. : SSSSSSSSSSSSSSSSSESS5SS5>>> ERROR <<  S$SSSSSSSSSSSSSSSSSSSSSSSSSS5S3 
2809 o11sso 00440 BR TSTES 33 
ee11 0115S2 005037 001124 4$: CLR $GDDAT EXPECT ZERO BACK FROM COUNT REG. 
2613 011556 017746 167614 MOV aASR -(SP) SAVE CSR CONTENTS. 
2814 01156e 052777 OOGO0S 167606 BIS SR :/SET TO MODE 2,G0 
28iS 011570 042777 100000 167600 BIC satis Qasr :/CLR ST FLAG. 
2816 011576 OSe777 OO10CO 167572 BIS 88179. aASR : GENERATE ST2 PULSE. 
2817 011604 017737 167570 O01i26 MOV JABR, ¢8oca7 :/READ COUNT REG. 
2816 Olleéie 052677 167560 BIS (SP)4, 9QSR : RESTORE CSR. 
ee19 011616 005737 OOl126 TST $aooat ; PREVIOUS _¢ CONTENTS OF COUNT REG 
e821 Ciiee2 01402 BEG S$ ‘IF SO - NEXT TEST. 
; | SSSSSSSTSSSSSSSSSS599535 ERROR «+ $$SSSSSSSSSSSSSSSSSSSSSSSSSSSE3 
2825 011624 104005 ERROR 5S , THE CLOCK FORGOT TO ZERO THE COUNT 
28c6 "REG. AFTER AN ste OCCURRED ON 
+548 :@ MODE 3 COUNT 


; ;SSSSSSSTTSSSFITESISTESSISE ERROR << ( $SSSSSSSSSSTSSSESSSESSSSSSESSSE 


ee —3_—_—_—— 


KO6 


MAINDEC-11-DVMNC-A8 macy gs 27 654 7-DEC-77 98 32 PAGE S7 
DVMNCA.F Li TS4 *TEST THE PP ock: MODE 3 OPERATION 
2831 011626 000411 BR TSTES 33 
11630 S$: 
2833 011630 ooso77 i6754e2 CLR aASR :NOW TRY CLEARING THE CSR 
e838 911634 17737 167536 001126 MOV 9ASR SBDDAT ;READ THE CSR - DID IT CLEAR? 
63S 311642 1403 BEO sTes 33 
e83t 011644 905037 001124 CLR SGDDAT :NO - RECORD S/B. 
é 

, | SESSSSSSSSSSSSSSSSSSSSSS.» ERROR << (SSSSSSSSSSSSSSSSSSSSSSSSSSSESSS 
eee 011650 104002 ERROR 2 ;CSR FAILED TO CLEAR 

:  SSSSSSSSSSSSSSSSSSSSSSSE> >> ERROR <<< SSSSSSSSSSSSSSSSSSSSSSSSSSSSESS 
2844 
eb4s = FSSSSRSSSESSSSERSSSRSSSSSHSSASSSSSSSSKASSKSHESSSSSSHSSSSSSFSSSRSSS 
eexe ; BTEST 6S #DWARF TEST OF OVERFLOW OUT,ST2 IN AND OL.,AND STi IN 
2846 + IN THIS TEST WE WILL TEST OVERFLOW ouT,ST2 IN $12 rout AND ST 
2849 :# IN TO DO THIS WE CONNECTED THEM TOGETHER WITH THE OwaRF MODULE. 
2850 i# NOTE: THIS TEST ONLY RAN IF DWARF MODE SELECTED. 
esse y S55 Ssdalal-5-4--5-lalahahabababahalebalebahahahebalahalahaiahalehahehaiahaiehshehahehahaiehsiehahaielehclelahiaieidiclala 
2853 011652 oo0004 +éT65 COPE 
2854 011654 012737 000010 001160 MOV #10,$TIMES :;D0 10 ITERATIONS 
2BsS 011662 012737 012076 901110 MOV #1$_SLPERR 
e85b 011670 O12737 012076 001106 MOV #13; SLPAOR 
2858 011676 005737 o014S0 TST WARF WARF MODE?? 
eeec apa semanas! ves TSYeb the RUN “a MODE 8S AT 250. 

UN DW L 
2861 011704 104401 011712 TYPE 6S5$ i 3 TYPE Rae l¢ STRING r 
2862 011710 do04e4 BR 645 :GET OVER THE ASC 
gBe3 paps ii GSS: "ASCIZ <200><7>"DWARF: ALL SWITCHES OFF, S2-1,S2-4 ON 
2865 011762 104401 011770 : TYPE 67S ;; TYPE ASCIZ STRING 
2866 011766 600417 BR 665 ;GET OVER THE ASCIZ 
e867 apelin ijg78: "ASCIZ <200>"ST1 IN (TTL$.SLOPE OUT (-). 
2869 012026 104401 012034 ; TYP. 9 ;; TYPE A TRING 
2870 012032 O00417 BR . bee: ‘oer ov ee tue Agesz 
2871 --69$: .ASCIZ <200>"ST2 IN crttd, SLOPE OUT (-)."<?> 
2872 012072 68s: 
2873 012072 004737 O14744 JSR PC,ANY2 
2874 012076 005077 167274 1S: CLR JASR :CLEAR CSR 
5876 Disiog obides tt peo | ere 
STb6 
2877 O12110 012777 177777 167262 MOV #-1, JABR i PRESET FOR OVERFLOW. 
2878 Ol2116 012777 OO00Li 167252 MOV #11/9ASR SET 1 MHZ,GO. 
2879 012124 o00240 NOF 
2880 012126 240 Noe 
Sese Bisize ppnsuO Nop 
NOP ;ALLOW TIME FOR OVERFLOW. 

2883 012134 012737 102210 001124 MOV #102210, $GODAT XPECT ST1 AND STTe FLAGS TO v, 
e884 012142 017737 167230 O01126 MOV aASR 5 sBbaat i EXPECT CSR oe me ~— 
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MACYi1 271/654) 27-DEC-77 09:32 PAGE S38 
#OWARF TESt OF OVERFLOW OUT,ST2 IN AND OUT,AND STi IN 


001124 001126 MP GODAT,SBDDAT ;0K” 
. bo $2908 $y 
. : S$SSSSSSSSSSSSSSSSSSSS55° >> ERROR ¢« ($$$$$$5555555555555555555555555 
ERROR 1 :ST1 AND/OR ST2 FLAG FAILED TO SET 


;  SSSSSSSSSSSSSSSSSSSSSSSS> >» ERSOR «<< SSSSSSSSSSSSSSSSSSSSSSSSSSSS359 


+ SSERSSSFSSASSSSSASSRSSASASSSSASSLSESSSLAPSSSF SLA ESSSLSFSS SSS SHE SS 


TEST 66 *DWArF TEST OF OVERFLOW OUT,ST1 IN AND OUT,AND STe IN. 
: 
i. IN THIS TEST,WE’LL TEST OVERFLOW OUT,ST1 IN,ST1 SUT, AND 
Had . 
:# 
; ° SFSSKESSSESRESSSKKEFRASSSSSESSSSSSSSSSSESSHASFSSSSFRFSSSSSSSSSES 
tSTe6: SCOPE 
000010 001160 MOV #10, $TIMES ;;D0 10 ITERATIONS 
12344 OO1iC MOV #1$;$LPADR 
12344 O01110 MOV #1$.$1PERR 
0014S0 TST QuARF ;DWARF TESTS SELECTED” 
012222 YPE beg iE TyPE ASCIZ STRING. 
SBeciz $380><70~ Lut Ehes Gre 
iieS3: LASCIZ <200>«7>"DWArF: ii c® SWITCHES OFF, Eke -2 AND S2-3 ON 
012304 } TYPE 67S i TYPE, ASCIZ STRING. 
BR 6$ oe OVER pts..236 
ij67%: "ASCIZ <200>"PANEL: same’ ge Tass TES 73) 
014744 JSR PC,ANY2 
167026 1S: CLR dASR 
001450 TST WARF 
BEG ST67 33 
177777 167014 MOV #-1, ABR ;PRESET FOR OVERFLOW. 
000011 167004 mov #11/aASR :SET 1MHZ,GO. 
NOP 
102219 001124 MOV #102210, $GDDAT ;EXPECT ST1,ST2 FLAGS SET. 
i 6764 001126 MOV gASk $8908 !READ CSR. 
1124 001126 CMP GDDAT , $BDDAT 
BEQ TST67 33 


; ; SSSSSSSSSSSSSSSSSSSSSSSS>>> ERROR << ( S$$SSSSSSSSSSSSSSSSSSSSSSSSSISSS 


ERROR 1 ;ST1 AND/OR STe2 FLAG(S) FAIL TO SET. 


;; SSSSSSSSSSSSSSSSSSSSSSSS">> ERROR << «SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


EERE EEEE EERE SEE ERE EAER SEE SA ER EALE LEER E EERE LESH KER EL EE EES 
tSTEST 67 *#IF ENABLED,CHECK THRESHOLD ST1 FROM TESTOR 


MRINDEC-11-DVMNC-A 


OVMNCA.P 11 
$33 
940 012426 
2941 
sae BR 
es44 9 Olete 
es4s Bi een 
cre Bie 
2348 O1gu5e 
e351 012464 
S325 012470 
e9S4 012534 
e9ss pisses 
sas piste 
2e9S8 012550 
e9s3 O01eSS6 
S300 pi seep 
2e3be Bi sero 
2963 012574 
2964 
2396S 012576 
23966 Ole60e 
2967 Ol1e602e 
2368 012606 
2369 
e370 O126Se2 
2971 OlebSe 
237e 012656 
2973 
2974 012730 
eg 012730 
23 012734 
e3 012740 
e978 012744 
239739 012750 
2980 012756 
e381 012764 
e38e 012772 
2983 912774 
2984 
e98s 
2986 
23987 
2988 
SES 
991 813006 
299e 
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MACYI1 271654) 
*#IF ENABLED,CHECK THRESHOLD ST1 FROM TEStOR 
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Te Stam <a ecru dante tates ibe in So 
T67: SCOPE 


"oe {BERANE TN TER ton MODE? 


BNE 4S ;YES DO THIS 7 
- IMP ENOF :NO-END PASS 
: TST DWARF ;DWARF MODE?” 
BEQ 40$ 
rst 38 7 ; QUESTION ALLREADY BEEN ASKED” 
Tyre i: TYPE ASCIZ STRING 
iigss .ASCIZ Oo ais VOLT subeee’ 18. BR anes 9 5A N)® 
ROCHR 
MOV 1840 ASK ASK 
BIC ;STRIP PARITY AND LOWER CASE. 
35$: CMPB 0.8 y :DID HE ANSWER YES? 
BEG gos 
CMPB ASK, #°N 
BEQ 398 
CLR ASK 
BR 4§ 
39: IMP ENDP 
‘ TYPE 67S i 3 TYPE ASCIZ STRING 
BR 6h ?GET OVER THE ASCIZ 
iig7S: -ASCIZ <200>sPANEL: ST1°4+ST2 POTS OUT AND CCWs 
> TYPE 69S si TYPE ASCIZ STRING 
BR 8$ : OVER THE ASCIZ 
iib9S: -ASCIZ <200>8DWARF: S2- 5! ge S2-8 ON,ALL OTHERS OFFs 
7 CLR aASR ;CLEAR CSR 
ISR PC,ANY2 
CLR aASR 
JSR PC,ANYKEY 
mov aASR $80 AT ;READ CSR 
BIT aBtfisteiT10, SBODAT ;DID ANY FLAG SET? 
ERROR 2 téry OR ST2 THRESHOLD LEVEL ERROR 


;FLAGS SHOULD NOT HAVE SET 


pyeggeggesennacssgeceseszocconsepeeseeesesodacgseenoenanencasas 
i eTES *#ST1,ST2 THRESHOLD TEST #2,POTS CW 
s scbneoceccnencesachsssecrecsenscessesocsbecssesssenenssenseuss 


+4170: SCOPE 
MOV is, LPERR 
MOV 1$'$LPAOR 


: 
fs 


NO6 
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THRESHOLD TEST #2,POTS CW 
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TYPE 65S ;; TYPE ASC IZ STRING 

BR 4 ::GET OVER THE ASCIZ 
bigs: -ASCIZ <200>@PPNEL: TURN’ POTS CWe 
1S: CLR JASR 

JSR PC,ANY2 

CLR aASK 

JSR PC, ANYKEY 

MOV 9ASR, SBDDAT 

BIT #61T1S!B8IT10, $BD0AT ;0ID ANY FLAG SET? 

BEQ TST71 3 

ERROR 2 ;ST1 OR ST2 THRESHOLD ERROR. 
5p EASES AAAELERAALAS RAAF SLES SAAS LASS LALLA SALES SESS SREL SS SLE SE SS 
:#TESt 71 #ST1.ST2 THRESHOLD TEST #3 MID RANGE 
MUTPTTITITTITI TT TIT TTT TT Tritt tt ttt eee 
t$T71: SCOPE 

MOV #1$,$LPERR 

MOV #15’ SLPADR 

TYPE 65$ 3; TYPE ASCIZ STRING 


BR 45 ::GET OVER THE ASCIZ 
--65$: .ASCIZ <200>sPANEL: SET'ST1,ST2 POTS MID-RANGE. »® 


1$: CLR JASR 

JSR PC,ANY2 

CLR R 

JSR PC,ANYKEY 

MOV SBDDAT 

MOV #BIT1S!BIT10, $GDDAT 

BIC #075777, SBDDAT 

cH $G00A7, $B00AT ;AT MID RANGE THEY BOTH SHOLD SET. 

ERROR 2 ;ST1 OR ST2 FAILED TO SET. 
5s EERE S REESE EE LASALLE ALLALSLELELELLLLALAAHLAFLEFLAERHLSFHR EASLEY 
:$TESt 72 *#TEST CLOCK REPEATABILITY IF ON TEStOR 
+ s FFSSRSSKSSESSSKASSERSSEASSAAASRASASSASKAESFRERSFKESRHRFRSS SLEDS 
$172: SCOPE 

MOV #10,STIMES ;;D0 10 ITERATIONS 

TST EXS ;TEStOR MODE EXABLED?” 
9$: J ENOP ;NO REPORT END PASS. 
ids: TST DWARF 

BNE 9$ 

MOV #1$,$LPERR 

MOV 81$.$LPADR 

TYPE 65$ ;; TYPE ASCIZ STRING 

R THE ASCIZ 


B 4§ ;;GET OV 
4gSs: -ASCIZ <200>#PANEL: STl POT OUT AND CWS 


TYPE 675 :;TYPE ASCIZ STRING 
BR bes !iGET OVER THE ASCIZ 


BO? 


MAINDEC-11-DVMNC-A 1 27(6S4) 27-DEC-77 P b1 
DVMnCA.P11 1? oTES clock REPEAT apicity IF I 7538 TEST SE% 0079 
? : jig?s: .ASCIZ «2008 ST2 POT IN AND SLOPE OUT (-)8 
1 s3e Lou4O4 013444 ; TxPE : TYPE onecte ne Bei 
30s oat iigos: BaScIZ 8 SOWARF: S2 ace Sus TEHES F,S2-6 ON® 
1 18 7 4744 . JSR PC,AN x2 
4 013514 4 16S6S4 1S: MOV ne T13!16,9ASR ; Streak" Stare ST2 GO ENABLE. TEST CLO 
1 77 1 CLR aTSCL AT a 
1. i 165666 MOV a1 aTSCLO ; 
1 000013 165656 MOV s13 ec SE te OMODE I 6o 
1 105777 1656 2s: TSTB aTseLc ;WAIT FOR CLOCK OVERFLOW. 
3 O01 go46 2s 
1 100000 165620 it £B1T1S,9ASR 
13556 042777 000200 165634 BIC 8200, @TSCLC CLEAR OVERFLOW FLAG. 
13564 105777 165630 3S: TSTe aTscic T FOR NEXT OVERFLOW. 
4 013570 100375 BPL 
13572 165600 CLR @ASR ;STOP CLOCK. 
1352 05077 Leste tk Be 
1 17737 165572 001126 MOV S$SODAT ;READ RESULTS 
3069 013610 Ole737 100000 o011e4 MOV #100000, $G00AT :S/B COUNT 
13616 Ol 001124 MOV DAT, 
7 1 163700 001126 SUB T’RO 
7 1 i L 4 
aera $1363 82652? coo007 re ee REIN HE, None men 7 counts. 
3075 61 3e3e 3401 > BLE TSt73 8 
3077 013640 104010 ERROR 10 ;CLOCK REPEATABLITY ERROR. 
3079 s FSSSSERSFKFKEKAAEHHRSKASESAKFKASSFKSKSSSRSASRSRAAESKSFRARSLARESSSESE 
3080 i $TEST 73 ND OF TEST 
3081 gle a. hate kt htt cet le ae naan oN 
308¢ 0i3642 oo0004 $677 SCOPE 
3084 SNOW WE’LL DETERMINE IF WE ARE ALLOWED TO AUTO-SIZE. 
3085 [IF SO, WE’LL FINO OUT IF THERE ARE OTHER CLOCKS OUT THERE 
3086 :To Test. 
3087 ; 
3088 013644 
ENDP: 
3090 013644 ooD0005 ° RESET 
soe 
3093 013646 105737 o00:215 TST NVM F APT W T UP i < 
spe, 12686 105737 iste se :SEE IF APT ILL LET UP AUTO-SIZE. 
3066 
3097 013654 023737 OO144O ocO14He CMP MDEVCT,TSTCNT  ;TESTED MAX. UNITS? 
soeg Glebe OOisty oo NEEL at, 
32106 013670 005237 601446 TRE MDE :POINT NEXT UNI 


CO? 


~_99 :32 PAGE 62 
a , ? E54 ) 27-DdEC 77 09: 3 
MAINDEC-11-DVMNC-A MACYI1 2 OF TESTS 
END 
DVMNCA. P11 173 4 858 so Te eet AoOR. 
318 013674 062737 000004 001376 mov OER nares BEVE CONTENTS OF LOE soca. 
? ais . 
103 0137 137 4 oo00C4 MOV IF NO MORE CLOCKS. 
zie Bigte BLES RES wo! Ne EO ERE IFW om 
3108 013714 005777 165456 1 HERE, ANOTHER, OUND. 
i TST —- $PASS iy 
i $ _ THIS UNIT. 
3108 913720 905737 o01202 salon: BNE ROTATE.UTEST  YES-RECORD’ ae 
ie : 758 0$3737 ies 3S: TYPE bss +3 TYPE Oven fuk Asctz 
4 37:GE 
iy 813740 Goodas °°” 2658: ASCIZ ©18)<12>“UNIT #* Sone 
3118 013754 wy | ertt,-a" + EO MG yPESOCTAL ASCITCALL DIGITS: 
e204 TYPOC 500 
117 013754 013746 001 ae 
Bn Bo Wm pre TIPSY 
3181 B135ee bocune - igg7s: ee eciz e ADDR= # 
31 y R TYPEOUT 
$152 BISHH ANCA SBTERE OF" OB RPSon, seus age Fon TWPEOUT ne 
1 
i St ey Se om OS pohipenyntoy 
3127 14016 062737 900004 TYPE 88 fiGeT OVER THE AS 
3ie8 O14 ete 
3129 014030 O00406 --695: .ASCIZ # VEC Co aod Goeeal 
3131 14046 688: MOV VECT1,~(SP) § 5 SAVE ASCIICALL DIGITS) 
313s ois ios4ge sete Type’ 718 1 YEE RSC e, STRING 
14 
3133 Bisces {64401 o1406e BR 70$ LETED * 
3135 014060 O00406 4718: .ASCIZ “ COMP 
i $: SDEVCT TRIN 
312 p14o7e oose37 ‘rey: TYPE 5598 i CET OVER THE AL Fa 
1 141 é UNIT # 
Sia Bidibe Adosid 5373S: .ASCIZ ™ TEStING atten Semel 
3ivz 014130 728: MOV SDEVcT,-(SP) = YvBe=-ScTAL ASCII(ALL DIGITS) 
Stag Bidise PhaadB 0220s mov (6)+, ERRVEC RESET ORE vect a AOOR. 
ivs 014 12637 O00004 #10, VECTI sYPOOTE ror 
314S O14136 O “02 AD #19, 
i49 Bidigs 886137 Sos3i8 °° j 
1% * 18: D,#4 TO STACK POINTER. 
49 014154 7 ADD #4, SP ;RESTORE'LO 
viet GLSICS GSC) pe RP Bes Srenmvec 
3152 014164 162737 000004 001 
3123 oaize 45: 


MAINDEC-11-DVMNC-A 


DVMNCA. FP 


TU ba ee ee ee ee ee be Be ee ee ee he a be Be be ee be be he oe he oe 
xy 
PO OW MEA Lalo OD ION LOMO VOUT E iRds CRUD WOUNE Gahoe- OUD 


hee at at i et ot on wt et wt eee nt tg eg ee te te 


il 


coo000 Oo0000 OO 


fu 
we 


014364 
014370 


NOO0ON0N0N0O00000000 
= hs ee be Be be be he he ee 
fStiiitce 
SRBRINTS RBS 


173 


bbosa8 


009406 


DO? 


“teil Oven Sk necte 


VE SOEVCT rae ere eters 
aagsaid 
Bet ahi Tyee 


ASR FOR T 


i160 Tye That y vase TT CALL DIGIT 
or over THE ASCIZ 


53 S88 VECT1 FOR TYPEOUT 


foe "aScr CTA, ASCIICALL DIGITS: 
+ VER THE Asc tz 


;BEGIN TEStING 1ST UNIT. 
;POINT TO IT. 


Tt tT SCC! 


R ($PASS) 


33 ZERO THE TEST NUMBER 


; ZERO THE NUMBER OF pienel sons 
UMBER 


: INCREMENT bay | PASS N 


;DON*T ALLOW A NEG. NUMBER 
OP? 


YES 


: }RESTORE COUNTER 


MACYI11 27\654) 27-DEC-77 09:32 PAGE 63 
END OF TES!S 
TYPE 75$ 
014200 iy th 
ijges: LASCIZ «15><12:"UNT? 
001204 ; MOV SDEVCT,-(SP) 
o14ece WP ‘ 77% 
BR 6S 
4j778: .ASCIZ # ADDR= # 
001376 Vv ASR, -(SP) 
TYEOC 
014254 798 
e aR 78$ 
5598: -ASCIZ &; VECTOR= # 
001402 MOV VECT1,-(SP) 
TYPOC 
014304 TYP 81s 
BR os 
--81$: .ASCIZ “; TEST comple rth = 
bds: 
001250 001376 2s: MOV He 
001244 001402 MOV ceerl” SECT! 
001204 001446 MOV SDEVcT:{LCNT 
001446 INC LCNT 
000000 001204 MOV 80, SDEVCT 
001440 CLR MDEVCT 
o00coi 001432 MOV #1, ROTATE 
.SBTTL END OF PASS ROUTINE 
4 ad rere PS A S At HON 0 TO IT 
*IF THERE ISN’T font Fg i Sob 
SEOP: ‘ 
001102 CLR STSTNM 
001160 CLR STIMES 
001202 INC SPASS 
100005 001202 BIC #100000, $PASS 
DEC (PC )+ 
SEOpCT: .WORD 1 
BGT SDOAGN 
MOV (PC)+,a(PC)+ 
SENDCT: .WORD 1 
SEOPCT 
O14444 PE 6S$ 
BR £43 


ss tyre ASCIZ pre 
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GET OVER THE ASC! 


roe 
os 


WNM-OWO NOU Swe 
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- 11-OVMNC-A 7.654) 27-DEC-77 09:32 PAGE 64 eRe 
Pit ENO oF Paes AdUFINE SE% o082 
-:65$: .ASCIZ <15><12>eENDPASS @ 
giases 013746 01202 et wy SPASS,-(SP) SA ASS FOR TYPEOUT 
O1ies 1044Ge TYPOC BOE BE cacTaL ASCII(ALL DIGITS: w 
14466 104401 oO14474 TYPE 675 : i TYPE ASCIZ STRING 
014472 000411 BR bes °GET OVER THE ASCIZ 
67%: -ASCIZ & VOTAL ERRORS ‘h 
pMeiG C1376 001436 bes: MOV ERCNT.-(SP) :SA CNT FOR TYPEOU 
¢ = is 
O14bee 104402 TYPOC 336 save EF =79C2A ASCII: ALL DIGITS 
014524 104401 014532 TYPE 69S i Pree ascig st ING 
014530 o00407 BR bes ::GET OVER THE Agciz 
--69$: .ASCIZ #8; THERE ARE # 
014SS0 66s: 
014550 013746 OO1446 MOV LCNT,-(SP) ;3SAVE LNT FOR TYPEOUT 
014554 104402 TYPOC : 3G0 YBE--OCTAL ASCII(AL. OIGITS 
014556 104401 oO14S564 TYPE 71% $3 TYPE ASCIZ STRING 
~ aw 718 OASCIZ oO oct, UNITS’ & — as 
8 . J 
014606 ‘ag: 
014606 104401 014614 TYPE 73$ ;; TYPE ASCIZ STRING 
di46i2 ooo4ic 2s °GET OVER THE ASCIZ 
eee 44,738: "ASCIZ <200>sTHE GooD UNtTS (L TO R) ® 
O14646 013746 001434 MOV UTEST,-(SP) ;;SAVE UTEST FOR TYPEOUT 
O0146Se 104405 TYPBN ::G0 TYPE--BINARY ASCII 
014654 013700 oo004e2 SGET42: MOV ae42,RO ::GET MONITOR ADDRESS 
014660 001405 BEQ SDOAgN ::BRANCH IF NO MONITOR 
014662 oo0000S RESET ::CLEAR THE WORLD 
014664 004710 SENDAD: JSR PC, (RO) ::GO TO MONITOR 
014666 O00240 NOP :: SAVE ROOM 
014670 o00e40 NOP 33 
014672 od00e40 s;ACTIL 
014674 SDOAgN: 
014674 000137 IMP a(PC)+ ; ; RETURN 
014676 OO23le S$RTNAD: .WORD LOOP 
014709 377 377 0060 $ENULL: -8YTE -1,-1,0 ;;NULL CHARACTER STRING 
014704 . EVEN 


i THIS ROUTINE TYPES LAST MESSAGE AND WAITS FOR AN OPERATOR 


: RESPONCE 
014704 105777 164236 ANYKEY: TSTB aSTKB ;CLEAR TTY READY FLAG. 
O147i0 104401 014716 TYPE 6S$ 33 TYPE ASCIZ STRING 
014714 0690413 BR 64S ‘GET OVER THE ASCIZ 
-65$: -ASCIZ ¢200<7>aswiTcn Sti 3 TIMES® 

014744 ids: 
Blames 104401 9014752 et 

4 TYPE 653 i; TYPE ASCIZ STRING 
014750 000417 BR 643 GET OVER THE ASCIZ_ 


s ¢ = < <7> 8TYP ¥ Y WHEN 
018019 HE Sciz 200> — ANY’ KEY WHEN DONE. 


FO? 
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DVMNCA.P11 ENO OF PASS ROUTINE 
e3 
3e65 915910 195777 164130 1S: T3768 agTKs :WAIT FOR OPERATOR. 
3267 915016 10S777 164124 TSTB asTKe ;CLEAR TTY RE he. 
3268 0150ee 104401 015030 TYPE 675 :; TYPE ASCIZ S RING 
3269 015026 000401 BR 63 ::GET OVER THE ASCiZ 
3270 -:;67$: .ASCIZ <c00es 
322 915032 bes: 
> 15632 ooc207 RTS PC 
re : 
375 SBTTL 11/0 SIGNAL TEST #1 STi IN AND ST2 OUT IN AND OUT 
= | 
3673 ‘SWITCH PACK S2 MUST BE SET UP AS FOLLOWS: 
3281 SWITCH i - OFF 
3282 : 2 - ON 
3283 3 - OFF 
3284 ; 4 - OFF 
3285 : S - ON 
3286 : & - ON 
3687 ; 7? - NOT USED 
3283 THIS SELECTS TTL THRESHOLDS AND POSITIVE SLOPE FOR 
3630 ; SCHMITT TRIGGER 1. 
323¢ i PLEASE REMOVE ANY PREVIOUS JUMPER. 
3238 : JUMPER THE FOLLOWING PINS TOGETHER: 
3236 Ji - SS (ST2 OUT) TO Ji - WV (STI-IN) 
3298 OAD AND START AT LOCATION 210 
3299 i LOR PASSES OCCUR IMMEDIATELY AND ARE NOT REPORTED 
3300 SERRORS ARE REPORTED AS IN THE REGULAR LOGIC TEST AND 
3201 : THEIR PRINTOUT MAY BE INHIBITED 
3303 015034 104407 IOTST1: CKSWR ; CHECK THE SWR 
3204 015036 005077 164334 i$: SLR JASR CLEAR THE CSR 
3305 015042 005077 164332 CLR SABR ; CLEAR THE BUFFER REG. 
306 O1504%6 012777 O00061 164322 MOV RATE ST1, MODE O, GO. 
3307 015054 052777 O01000 164314 BIS aBitS, SAR GENERATE” A MA NTENANCE sT2 
3308 015062 012777 OOO0D0S 164306 MOV §R NOW SET TO RE T REG 
32309 015070 052777 001000 164300 BIS setts. aASR FORCE COUNT => BUFFER REG. 
3310 015076 027727 164276 O0000i CMP dABR, #1 :DID COUNT REG ADVANCE ONCE” 
3311 015104 0601753 BEQ 1oTsti :YES - LOOP. 
33i2 015196 104000 ERROR :STe out” TO sTl IN FAILED. 
3213 016110 600751 BR IOTST1 
3315 ; 
231 .SSTTL 31/6 SIGNAL TEST #2 CLOCK OVFLOW OUT TEST. 


© 


a 


QOG 


GO? 


-DvINE 8 MAcYil 27.684) 27-DEC-77 
: tet ca crock Own Our feet. 


= Y 
> 

PS 33-0 

: 


SWITCH Pack S2@ MUST BE SET UP AS FOLLOWS: 
: SWITCH 


i 
3 
4 
S 
6 


Raas Se 
ALLIS 


: F 
; ? = NOT USED 


THIS SELECTS TTL_THRESHOLDS AND POSITIVE SLOPE FoF 
; SCHMITT TRIGGER e. 


‘PLEASE REMOVE ANY PREVIOUS JUMPER. 
: JUMPER THE FOLLOWING PINS TOGETHER: 
Ji - RR (CLK OV) TO J1 - TT (ST2-IN) 


LOAD AND ed un’ Leet tes 
ENO PASSES 0 


UR IMMEDI TELY ai ARE NOT REPORTED. 
RRORS Cee UR ED aS IN TH toa LOGIC TEST anc 
HEIR PRINTOUT MAY BE INHIG 
15112 104407 rotste: &kswR 
Bietts feeteS  teuose ing aASR i RHESK fT 
015120 012777 177772 1e42se mov #- 1, 20BR | PREL O80 PRESET oat 
4 8 
B1515s 06 777 8889 83 iB4 $35 BIS SBT tS acsR :G BENERST b A mee Ett st s¥9 
15142 40 NOP 
Dieta SOEeST>  1euze4 nor A DID OVERFLOW SET STz FLAG” 
; ec LAG 
Bieids R222 BAI hie i022 OVERFS 
0161564 104000 ERROR [CLK OV OUT TO ST2 IN FGILEC. 
015156 900755 BR 10TST2 LOOP 
-SBTTL bt/0 SIGNAL TESt #3 ST1 OUT AND ST2 IN 


iSWITCH PACK Se MUST BE SET UP AS FOLLOWS: 
SWITCH 


: 1 - OFF 

: 2 - OFF 

$ 3 - OFF 

; 4 - ON 

3 S - ON 

$ 6&6 - ON 

; 7? -_NOT USED ae A 
; THIS SELECTS TTL THRESHOLD AND POSITIVE SLOPE FOR 
: SCHMITT TRIGGER e. 


ee ee oo —_—-— 
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DVMNCA. ii :30 SIGNAL TEST #3 ST1 OUT AND ST2 IN 

ie [PLEASE REMOVE ANY PREVIOUS JUMPERS. 

- NG PINS TOGETHER: 
a : JUMPER THE FOLLOWING PINS TOSE 5s, . ot coven 
3377 START AT LOCATI it 

> ND PA 1ATELY BNO ARE NOT REPORTED 
3358 ‘pred BSReS RECUR ED Be TN gREGULRR LOGIC TES7 anc 
3380 : THEIR PRINTOUT MAY BE ane 

151 94407 IOTST3: CKSWR i CHECK | THE SUR 
ea ia wae ae oY een 
3382 D18i5e z 555 Tearo4 #27 sel) ‘ ‘BENE ee FLAG Set? 
3386 015202 100401 BMI i$ 
3387 015204 104000 ERROR :ST1 OUT TO ST2 IN FAILED 
3388 915206 932777 010000 164162 18: git #81712, 0ASR :DID_ “FOR™ BIT SET? 
333; Siesie [64584 Be oR POR RTT SET ON ONLY 1 S72. 
3392 015220 O00rs* BR 10TST3 LOOP 
3394 .SBTTL 
3395 "SBTTL *SYSMAC ROUTINES 
3296 "SQTTL 
3338 .SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
3400 +s SHASSSSSSSSSSSKASHFSKSKKAASSHESSSKRAFLSSSFSFSFSSSSSRFFSAFSSSSFLARSSS 
3401 $THIS ROUTI 1S USED TO CHANGE @ 16-BIT BINARY NUMBER TO A 6-DIGIT 
3452 tsOCTAL (ASCII) NUMBER AND TYPE IT. me 
3403 : BSTYPOS-~-ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
~ + 
3465 ts NUM, - (SP) ;;NUMBER TO BE TYPED 
3456 te TYPOS !ICALL FOR TYPEOUT 
3407 :# “BYTE N ;;N=1 TO B FOR NUMBER OF DIGITS TO TrPE 
3408 7+ .BYT M ;;M=1 OR 
3409 ty ;;1=TYPE LEADING ZEROS 
sic is ‘ SUPPRESS LEADING ZEROS 
:* 

ee  #$TYPON----ENTER HERE TO tYPE OUT WITH ne SAME PARAMETERS AS THE LAST 
3413 ;#$TYPOS OR S$TYPOC 
ayi¢ :9CALL MOV NUM, - (SP) NUMBER TO BE TYPED 

¢ :# a + 
3438 is TYPON 23C CALL FOR TeBEOUT 
a8 : S§TYPOC~--ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
46 i MOV NUM, - (SP) ;;NUMBER TO BE TYPED 
3421 - TYPOC !ICALL FOR TYPEOUT 
3423 QiSE22 917646 D000 STYPOS: MOV 3(SP).-(SP) ;;PICKUP THE MODE 
3424 C152ece ilees? O00001 ossus MOVB  -:1 SP) °$OFILL ?ILOAD ZERO FILL SWITCH 
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DVMNCA.P 11 NARY TC oCTAL (ASCII) AND TYPE 

015234 112637 o15447 MOVE (SP ie GOMODE+1 ;;NUMBER OF DIGITS TO 

326 015240 eats o0ce ADD 8 48 SF ;;AOJUST Re TURN AboReSS 
¢ coy 

3428 015246 beets oco0001 O1S44S $TYPOC: MOvVB ai, SPILL 3;SET THE ZERO FILL SWITCH 
3429 015254 112737 OO0C00E O15447 MOV 8t | SOMODE +1 i336 FOR SIx(6) DIGITS 
3430 Ol 1e737 O0000S O15444 S§TYPON: MOV 8S. SOCN ay THE TERATION COUNT 
3431 01527 1 MOV R3'-(SP) $5 R3 
His Glas Bide mov. Recep) |i Seve Bs 
3435 pies 13704 015447 MOVB SOMODE* RY ‘i 3ET THE NUMBER OF DIGITS TO TYPE 
3435 besos bbeao4 NEG 
3436 015304 704 ADO Se.R ;;SUBTRACT IT FOR MAX. ALLOWED 
3437 01 310 110437 015446 MOVB RY SOMODE ; : SAVE IT FOR. 
3438 015314 113704 O1S44s MOVB SOFILL,R ::GET THE ZER weet Sue SWITCH 
3439 015320 016605 oOcOo0ie2 MOV kecSP), a ; ; PICKUP They MBEF 
3440 015324 905003 CLR R3 CLEAR THE ol PUT NORE 
3441 015326 006105 18: ROL RS ;;ROTATE MSB INTO “C™ 
344e 0153 000404 BR 33 :GO DC MSB 
3443 015332 006105 23: ROL RS tFORM THIS DIGIT 
3444 015334 906 105 ROL RS 
3445 015336 105 ROL RS 
3446 015340 010503 MOV RS,R3 “ 
3447 015342 006103 3S: ROL R3 ;;GET LSB OF THIS DIGIT 
3448 piesuq 105337 ois446 DECB SOMODE i: TYPE THIS DIGiT? 
3449 915350 100016 BPL 7$ ::BR IF NO 
3450 015352 2703 177770 BIC 8177770,R3 ::GET RID OF JUNK 
3451 015356 001002 BNE 4% ;; TEST FOR 9 
3452 015360 704 TST RY ::SUPPRESS THIS 07 
3453 015362 001403 BEG S$ ::BR IF YES 
3454 015364 4$: INC RY ::DON’T SUPPRESS ANYMORE O'S 
3455 015366 052703 o00060 BIS #°0,R3 ::MAKE THIS DIGIT ASCII 
3456 015372 O03 oo0040 S$: BIS 8° ‘R3 MAKE ASCII IF NOT ALREAL 
3457 015376 110337 O1544e MOVB R3, 4S ::SAVE FOR TYPING 
3458 015402 104401 O1S44e TYPE a$ ::G0 TYPE THIS DIGIT 
3459 015406 108337 015444 7$: DECB $OCNT ::COUNT BY 1 
3460 015412 3347 BGT 2s ::BR rf MORE TO DO 
3461 O15414 240e BLT 6$ ;;8R_IF DONE 
3462 015416 005204 INC RY :: INSURE LAST QIGIT ISN'T A SLANe 
3463 015420 900744 BR 2s :;G0 DO THE LAST DIGIT 
3464 015422 012605 6S: MOV (SP)+,R5 :: RESTORE RS 
3465 015424 612604 MOV (5P)4+°R4 : RESTORE RY 
3466 015426 012602 MOV (5P)4+°R3 i; RESTORE R3 
3467 015430 O16666 oO0c00e ofo004 MOV 2(SP),4 (SP) ;;SET THE STACK FOR RETURNING 
3468 015436 012616 MOV (SP)4' (SP) 
3469 015440 9d0000e RTI ; ; RETURN 
3470 O15442 006 gs: .BYTE O :;STORAGE FOR ASCII DIGIT 
3471 915443 000 ‘BYTE O :: TERMINATOR FOR TYPE ROUTINE 
gs Gene Be Sorts. Be 8 i denoretve aufeen 
3474 O15446 900000 SOMODE: -W NU OF DIGITS TO TYPE 


ORD O N R 
"SBTTL. @INARY TO ASCII AND TYPE ROUTINE 


; FEES ERSEEEEEEEELSE ESSE SSSHEEFEFERELALES PEP HESAS SESS ESHER EE ED EE DE 
I eTHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO 4 16-817 
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DVMNCA. FLL BINARY TO ase tr AND TYPE ROUTINE 
3479 s*@BINARY-ASCII NUMBER AND TYPE IT. 
34ec 7 *CALL. Susan 
3481 : Vv NUMBER, - (SP) ;WUMBER TO BE TYPEC 
3482 * TYPBN :: TYPE IT 
463 
Pm Ois4SO C1014 $TYPBN: mov Ri, “thy + Taye rt wy THE aun 
4 4 Vv (§ ) 
3486 1eyee ses ei — SEC :SET “C™ SO AN WEEP TRACK OF THE NUMBER © 
3487 1360 e737 oo00eo ciss22 18: MOVB #°O,$6IN : SET CHARACT R TO AN ASCII “0”. 
348s 0154 101 ROL Ri GET THIS BI 
3483 0154 1406 BEG es : DONE? ck: teikte debe 
3490 015472 105537 O18s2¢ adcB BIN ::NO--SET THE CHARACTER EQUAL HIZ BI 
3491 015476 104401 015522 TYPE . SBIN ;;G0 T THIS BIT 2 fe 
ai3¢ Bi sete Boosh cuc ;;CLEAR “C™ SO CAN KEEP TRACK OF BITS 
34 1SS04 76 1$ :360 09 THE NEXT BIT 
3494 0155S 01260: 2s: MOV (SP)¢,Ri :;POP THE STACK INTO R1 
3495 015510 916666 O00002 oD00004 MOV 2(SP),4(SP) ;;ADJUST THE STACK 
size SlEEs8 desis 11 Repl nd TUAW 0 vSER 
3438 015522 006 ooo SBIN: .BYTE 0,6 + oS ORACE FOR ASCII CHAR. AND TERMINATOR 
3500 
$20} .SBTTL ERROR HANDLER ROUTINE 
3$03 sevevercecceresonnseccocooasgoesssesecgeseseosezeotsesssces ens 
3504 t RTHIS ROUT INE NE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
3595 :#SAVE THE ERROR ITEM R AND THE ADORESS OF THE ERROR CALL 
2506 :#AND GO TO SERrTYP ON ERROR 
3507 :#THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
35908 >#SW1S=1 HALT ON ER 
3393  eeul3=i INHIBIT ERROR TYPEOUTS 
2510 ;#SW1iO=i1 Brie ON ERROR 
seid i #SWO3= 1 LOOP ON ERROR 
3@ 
3513 :# ERROR N ; ;ERROR=EMT AND N=ERROR ITEM NUMBER 
35:5 o1sse4 SERROR: 
3316 015524 10440 CKSWR ;;TEST FOR IN SOFT-SWR 
3517 015526 105237 9001103 7$: INCB SERFLG 3;SET THE ERROR FLAG 
3518 015532 1775 BEG 7$ ::DON’T LET THE FLAG GO TO ZERO 
3519 015534 3777 GOll02 1634 MOV STSTNM, QOISPLAY ;;DISPLAY TEST NUMBER AND ERROR FLAG 
3520 Bi 248 3e777 O0e900 163370 BIT #681710; ISWR ;;BELL ON 
352i 015550 00140e BEQ 1$ ;;NO - SKI 
2Se2 0155Se 104401 001164 TYPE LL 3 3RING BELL 
3523 O15SS6 005237 OOllie 1$: INC Rit $s COUNT THE NUMBER OF ERRORS 
3524 015562 011637 OO111E MOV CF) RRPC :GET ADDRESS OF ERROR INSTRUCTION 
3525 015566 162737 000002 o01116 SUB SERR 
35e6 015574 117737 16331— 001114 MOVB SstRrrc, SITENB STRIP AND SAV - THE ERROR ITEM CODE 
27 0156 032777 O20000 163330 BIT s6IT13, dSWR :SKIP TYPEOUT IF SET 
28 015610 901004 BNE 20 i Skip TYPEOUTS 
3529 015612 004737 9015732 JSR Pe SERRTYP ::GO TO USER ERROR ROUTINE 
3230 915616 104401 0661171 iad TYPE $tRLF 
“= J $ 
2532 018622 122737 o00001 o012:4 cMPB BAPTENY, SENy >;RUNNING IN APT MODE 


KO? 
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DVMNCA. P11 ERROR HANCLER SUT INE SEG 0CSS 

3533 015630 001007 BNE es ::NO,SKIP APT ERROR REPORT 

1 13737 001114 Ccise44 MOVB SITEMG, 213 ::SEt ITEM NUMBER AS ERROR | NUMBE= 
333 G1seHG 737 «017424 JSR PC, $ATY" : :REPORT FATAL ERROR TO 
3538 15644 218: -BvTE 9 
323, Bleese oo0es> 223: a 325 ; ;APT_ERROR LOOP 
3239 91 30 777 163264 23: TST Swe ::HALT ON ERROR 

15654 1 BPL 33 ::SKIP IF CONTINUE 
3541 Ol 690009 HAL :;HALT ON ERROR! 
soe O 1o490 CKSWR :; TEST FOR CHANGE IN SOFT-SWR 
354 1 777 O01000 163250 33: BIT s81T09, ISWR ::LOOP ON ERPOR SWITCH SET? 
3544 Ol 001402 BEG 43 : BR IF NO 
354s 01 72 13716 001110 MOV SLPERR, (SP) :;FUDGE RETURN FOR LOOPING 
3548 015878 008739 00116e 4$: rst SESCAPE is CHECK FOR AN ESCAPE ADNRESS 
35 612506 013716 001162 MOV SESCAPE, (SP) :IFUDGE RETURN ADORESS FC.« ESCAPE 
3243 015710 S$: 
3551 015710 005237 001436 INC ERCNT ; “UPDATE ERROR COUNT - 
3552 015714 00100e BNE 10$ :7BUr DON’T LET IT OVERFLOW. 
3553 Gis7i6 005337 001436 - DEC ERCNT /KEEP AT 177777 IF OVERFLOW. 
3555 015722 043737 001432 001434 BIC ROTATE, UTEST pel UNIT FROM LIST OF GOOD ONES. 
356 016730 900002 RTI :/EXIT. 
3238 .SBTTL ERROR MESSAGE TYPEOUT ROUTINE 
3560 + SHSSSSSSKESKEKSSSAASSASSSSEKAAKASAASAFSSKARSFLSSRSSKSRASRHFSRSS 
3561 : ATHIS ROUTINE USES Te ni Ten CONTROL BYTE” (SITEMB) TO DETERMINE WHICH 
3562 : #ERR — REPOR THEN OBTAINS, FROM THE “ERROR TABLE” ($ERRTB), 
3563 : SAND REPORTS HE EPPROPRIATE INFORMATION CONCERNING THE ERROR 
3565 015732 SERr TYP: 
3566 015732 104401 o01171 TYPE ;;" CARRIAGE RETURN” 8&8 “LINE FEED” 
3567 015736 100% MOV ka” RSP) i i SAY ER 
35 015740 o0S000 CLR RO’ PICKUP THE ITEM INDEX 
3569 015742 153700 001114 B1Se aeSITEMB,RO 
3570 015746 001004 BNE i$ ssHEIT M M_NUMNBER IS 1s e ZERO, JUST 
3572 015750 013746 O01116 MOV SERRPC,-(SP) tt chy VE SERRPE POR SPEOUT 
3573 : ERROR ADDRESS 
3574 O15754 104402 TYPOC :GO TYPE--OCTAL ASCIICALL DIGITS? 
35 015756 o00426 BR } T OUT 
3576 015760 005300 1$: DEC RO aonUsT THe INDEX SO THAT IT WILL 
3577 015762 006300 ASL RO i K FOR THE ERRCR TABLE 
sere Bierce Botton at RS 

L 

35 015770 760 o012s6 ADD #SERRTE RO sone J TABLE POINTER 
3581 015774 012037 016004 MOV 0)+,2% :PIC PEC OR MESSAGE” POINTER 
3582 016000 1404 BEQ ss. SKIP “tye OUT IF NO POINTER 
3583 016002 104401 TYPE ti SKE — THE “ERROR MESSAGE” 
3584 016004 900900 2s: .WORD 0 :; "ERROR WiESsace™ POINTER GOES HERE 
3585 O16006 104401 001171 TYPE SCRLF ::“CARRIAGE RETURN” & “LINE FEED” 
2586 O160i2 012037 dO:&62e 33: MOV 1RO)+, 4S ::PICKUP “DATA HEADER” POINTER 
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ERROR MESSAGE 1 Spe sut ROUTINE 


001404 ;; SKIP Aa. 3 IF 0 


b50000 . 48: yt 0 i aba THE AOE "pOINTER | GOES HERE 
11000 | S$: t  pTCKU TYRBLE™ POINTER 
BNE ? :;G0 TYPE THE DATA 


6$: 


a) Las yee 
DVMNCA.F 


5 
o 


i “CARRIAGE RETURN” & “LINE FEED” 
; RETURN 


@(RO)+,-(SP) Bk RO)+ FOR ren? T 
An e --OCTAL ue 3 Tat. DIGITS 
(RO) a ANOTHER NUMBER? 


016062 wes hae TWO(2) SPACES 
000 BS: “ASCI2 re HOOT a) SPACES 
-SBTTL SCOPE HANDLER ROUTINE 
; LESELSLELLA SELLA ELALAALLLLAASHELLSLAESSLELA HEE E ESSE SEES TEESE 


jATMIS Rout ie CONTRO mee rhe et Loo ane OF Syerest S. IT WIL’ INCREMENT 
) INTO THE DISPLAY REG. (OISPLAY<7:95 


StNM 
"Hee ($ ERG) NTO OLE AY 1S: os 
i oe nt Niag BY THIS ROUTINE ARE: 


LOOP ON TEST IN SWR<7:0> 
SCOPE 3; SCOPE=IOT 


7S: 
‘ . 


ONOONOOOCOOO0000000 = ~ 
Spd 


bb be Fe Fe be he he be he hehe ee | 


oe 
12] 
Ww 
o 
oO 
o 
fu 


016066 


bats 
RAL 


tata 
rewits hs 


TU be 
OWONMVUIE tue 


exsin ;;TEST FOR CHANGE IN SOFT-SWR 
K 
040000 163040 : BIT #B1T14, ISWR ; sLOOP ON PRESENT TESt? 
BNE vE YES IF SWi4=1 
eeesaSTART OF CODE FOR THE XOR tt TERseaee 
éxTSTR: BR 6$ IF RUNNING ON THE Sx OR TESTER CHANGE 
$3 THIS i TRUCTION A “NOP™ (NOP=240) 
JSERRVEC, - (SP) a: ONTENTS OF THE ERROR VECTOR 
oo0004 85S, JSERRVEC ::SET FOR Timeout 
38177060 37 “gut ON XOR? 
(SP)+, J#ERRVEC ;;RES THE ERROR VECTOR 
BR SSVLAD ::GO TO NEXT T TEST 
S$: >: CLEAR ACK R vecr a TIME OUT 


TEST 


fwre 


36 
36 
36 
36 
36 ‘ 
36 
36 
36 
36 
36 
362 
36 
362 
36 
3625 


009004 


BR 
63:;8e8e8END OF 
000400 162772 BIT ,aS £180 , ON SPEC. TEST” 
162764 001102 “ EON DN ald TESt? SWR<7:0> 


00146 
105737 001103 : : HAS HN ERROR OCCURRED” 


NQOVNVVONOO0000000 
a ee eee ee ee 
COOKS SK 
a ee ee 
OP OTF OORNOTNTOL 
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SCOPE HANDLER ROUTINE 


DVMNCA. 


Pli 


Bites 


eer 


RERSTARSMRS TSG ES 


Ror 
eo 


25° 


WW 


— 
£o 


eas 


OOO OONOOGOQONO ONG QO000000 000000 


ee ee ee ee 


fit 
oro 


Q000 VBO00000000 
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001103 
162734 
001106 


001115 


162702 


88888s8s= 


i=) 
Oo 


001140 


000001 


017075 


60176 


MO? 
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$SSVLAD: 


SOVER: 


SMXCNT: 


BErnnax, SERFLG 

#81109, asi 

ior 
VER 


RFLG 
STIMES 


1 
° IT11,a@SWR 
SPASS 


CHES SICNT 

tok . 

#1,SICNT 
KENT, STIMES 
TSTNM 

SISTNM STESTN 

( R 


as 


SESCARE 


al RMAX 
STSTNM, DISPLAY 


SLPADR, (SP) 


0. 
.SBTTL TTY INPUT ROUTINE 


;;BR IF NO 
;;MAX. ERRORS FOR THIS TEST OCCURPED” 


33 F 

iL "ON ERROR” 

!ISET LOOP ADDRESS TO LAST SCOPE 
ZERO THE ERROR FLAG 


His "45 F THE THe WREXY, 1 atte ce Pecans 


a ae T_JTERATIONS” 

i F FI F PASS OF PROGRAM 

ee NHI 

He ON COUNT 

; i CHECK Beat em TTL AATIONS MADE 

RE INTTIAL TERATI ION COUNTER 
NUMBER OF ITERATIONS TO DO 


dave "Feoet't NUMBER IN APT MAILBOX 
sf 

thE Y AL itBerL't E Of ERROR, BOOREES 
ss DT LAY TEST NUMBE 

iif 0 BE TURN ADDRESS 

::MAX. NUMBER OF ITERATIONS 


sane a GES ERE ISS 
L 


— 


SOPTuARE “SuITCH REGISTER CHANGE ROUTINE) 0710'S 


QUT TNE ne 18 ENTERED 
Eas In} rYiverene MODE. 


SGTSWR: 


,SCNTLG 
SMSUR 
SWREG, -(SP) 


CRON TH THE E TRAP” HANDLER 
LER 


WIL 
OF TWARE auf TeH REGISTER TRAP CALL 
i318 THE SOFT -SWR SELECTED? 
ANCH F NO 


R 
WE RUNNING IN AUTO-MODE” 
BRANCH IF YE 


;ECHO THE a hg om (tG) 
1: TYPE CUR ONTENTS 
$33 SWR EG. 
GO TYPE--OCTAL ASCTICALL DIGITS) 


SSNS 


PAPERS BIRR 


bb be 
~ 


RERESSRON CARTE 


e 


POEMS KOK SSO CK 
<= 
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Thy INPUT ROUTINE SEG 009: 
? TYPE , SMNEW ;;PROMPT FOR NEW SWRA 
beeoag —— 19$: CLR -(SP) 1 The Nel COUNTER 
OOSO46 - 7 +f rt | ii HE i 
ibaazg | TOE"E bg L 33 ‘iff PROT tay AGAIN 
7746 47 MOVE aSTKB,-(SP) : PIC CHAR 
42> Ie 138258 BIC tae ee ; MAKE ey 7-BIT ascil 
921627 000025 9s: one (SP), 825 si1S 17 IT a. CONTROL - u? 
4 707 TYPE SCNTLU asY Cc NTR Ctl) 
p 3382 BAaboE 20s: Add b& SP tt TESaef rer 
000757 BR 19% ate sat S TRY IT AGA 
O51 C4 ooo0is 10$: cre (se), aS a Arf som” 
905756 oo0004 Tet 4(SP) 53 YES Is ved THE FIRST CHAR? 
016677 000002 162416 MOV 2'SP), aSWR Save ne sur 
199401 OO1177 148; ype SCALE i EGHO. CR? BOO LF 
leave? ¢ 011 000001 ; cn sfnBG, 0 1 REE E Try KBD INTERRUPTS” 
12777 OO0100 162374 aa mov #100, a$TKS : ; RE-ENABLE TTY KBD INTERRUPTS 
737 017336 16$: JSR PC STypEC ::ECHO CHAR 
Oe 1627 000060 CMP SP),# :;CHAR < Q? 
20 BLT 18s ;;BRANCH IF YES 
021627 oO00067 CMP (EP), #67 ::CHAR > 7? 
pus7ee 00060 Bec be0, (SP)+ + OTST OFE Aserl 
605766 000002 rst e( SP) ::IS HIS THe SETAST CHAR 
eile = iB Hk ag ae 
006316 ASL (SP) :; _ ROOM FOR NEW ONE 
005266 oo0002 178: INC 2°SP) ::KEEP COUNT OF CHAR 
OS6616 177776 BIS -2(SP), (SP) ::SET IN NEW C 
000707 BR 7$ ;iGET THE NEXT ONE 
10440: 001170 18S: TYPE SQUES i TYPE 7<CR><LF> 
072 BR 20s :; SIMULATE CONTROL - -U 
.DSABL LSB 


SEAESEEEAFLASELES ESSE EHS SLES HALAL ERASRHRAHRERSE RE SEES ESE 
:ATHIS | ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 

:* 
;* Ws ROCHR ;; INPUT A SINGLE et hh FROM THE TTY 
;* RETURN HERE ; ; CHARACTER IS ON STACK 
;# ;;WITH PARITY BIT ef IPPED OFF 
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TTy INPUT Rodd rhe s€% 0092 
116% SROCHR: MOV (SP), -(EP) ; ;PUSH THE PC 
S 909004 oo00ce mov 4¢SP) ,2(SP) i 5 SAVE THe PS 
1 1 1S: TSTB KS ;;WAIT F 
1 BPL 1 :3A CHARACTER 
1 1 7 004 MOVB TKB,4(SP) ;;READ_THE TTY 
04 BIC etC<(1?7>.4(SP) :;GET RID OF JUNK IF ANY 
3 CMP 4(SP), #23 3318 IT Fn -$? 
i 162244 2s: ° EB TKS ;;WAIT FOR A CHARACTER 
1 7S BPL ssl UNTIL_ITS THERE 
i 1g2e40 Move Tke -(SP) 3;GET CHARACTER 
1 7600 BIC atC17?, (SP) :;MAKE IT 7-BIT ASCII 
i CMP (oP), bei i318 TA -Q? 
1 on tf 33 shes I 
Bae 000004 o00140 3s: cnP 4(SP), #140 siTe tT PP R CASE? 
000004 000175 CMP 4(SP), #175 3318S IT A CIAL CHAR? 
003003 GT 33 YE 
042766 o09040 900004 ic #40, 4(SP) i SAKE 17 CASE 
ooco02 Ss: >:GO USER 
METI ttiiittiiiictiiiiititlitttt li 
j RTHIS ROUTINE WILL INPUT A STRING FROM THE TTY 
i RETURN HERE + Merce SF ETRST CHARBETER WILL BE ON THE STACH 
-& $3 a! . 
2% + OOO TRATOR WHEE BE A BYTE OF ALL O°S 
010346 SROLIN: MOV R3,-(SP) ;;SAVE R32 
012703 017060 1$: MOV aStTYIN,R3 ;;GET ss 
022703 017070 es: CMP SSTTYINGS. ,R3 ; ; BUFF’ FULL? 
101405 BLOS +) ;;8R YE 
104410 RDOCHR ;;G0_ READ ONE CHARACTER FROM THE TTY 
1 he! MOVB (SP)+, (R3) 3GET HARAC TER 
hee 13 000177 10S: CMPB 8177, (R3) :3I I A RUBOUT 
1 + 3 33;SKI F NOT 
104401 001170 4$: SQUES :;TYPE A °?? 
0007 BR {gs ::CLEAR THE BUFFER AND LOOP 
1113 017056 3$ Move (R3),9S ::ECHO THE CHARACTER 
104401 017056 TY 95 
heer 3 is CMPB $15, (R3)+ ;;CHECK FOR RETURN 
1 8 xj >;LOOP IF NOT RETURN 
1 177777 CLRB -1(R3) ;;CLEAR RETURN (THE 15) 
104401 001172 TYPE $LF :: TYPE A LI 
12603 MOV tSP)+,R3 ; sREST 
11646 MOV (SP), -(5P) ::ADJUST THE STACK AND PUT ADORESS OF THE 
16666 900004 oDD002 MOV 4(SP$.2°SP) ts FIRST ASCII CHARACTER ON IT 
012766 017060 oo0004 MOV aSTTYIN, 4(SP) 
oodo02 RTI ; ; RETURN 
900 9s: .BYTE 0 ::STORAGE FOR ASCII CHAR. TO tYPE 
000 "BYTE 0 :: TERMINATOR 
000010 TTYiN: .BLKB 6 t:RESERVE 8 BYTES FOR TTY INPUT 


COs 
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TTY INPUT ROUTINE 


rR SPH BRERAF coob!d SENTLE: :ASCLE “te e<18) 18. ETESNTROL “O" 
O02 OOSOIS 053523 O20i22 SMSWR: .ASCIZ ¢1S><12>/SWR = / 
iB at: 47040 0S3505 SMNEW: .ASCIZ / NEW = / 

M .SBTTL TYPE ROUTINE 


eee eee eee RECT? MESSAGE TESSAGE MUST TERSINATE WITH AO B 
ROUTINE TO TYPE ASCIZ T TERmINATE WITH AO B 


iS toortne Hi, Frog A UORE Bebe SSE "Dec OE" fe HE. EF Bicwnc rex 
sEIGTES: —FHLEE EQUTRHNE FOE ERERACIOG GHEE, SPREReNS MEET 


MAINDEC 
OVMNCA . F 


ae of 


“11 
ll 
7 
01 

1 
i 

1 


8 
71 
Zi 
71 
7i 


2@ 


COD eden eo cow wD ed 


TUM & bb + be ee 
WN -OWONT WU CWO 


* SCALL 
te1) A TRAP INSTRUCTION 
; USING. PMECSOR TON MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
;* 
382 ;* TYPE 
382 is MESADR 
3824 ;* 
3536 017124 105737 001157 STYPE: STB  STPFLG i318 THERE A TERMINAL” 
3827 617130 100002 BPL iS : BR 
3828 01713e HALT HAL FUERE IF NO TERMINAL 
171 BR 3s i teave™ 
e351 Gita OF 2 ns nOY Sotspy ss 2 STRING 
tis 
3634 Bi5tg8 942599 Besser oie CMPB es ae be ad AOoE 
3833 017152 O01011 BNE 62s ck FOR APT CONSOLE 
3834 017154 000100 oo1215 BITB © SAPTSPOOL, SENvM ; tee Fon” 
38 17162 1405S BEQ 628 $3 8 & Oe Ober CONSOL 
3836 017164 010037 017174 MOV RO,61$ : SETUP MESSAGE ADDRESS For APT 
3837 017170 OOW737 i741 = JSR PC, SATY3 foes glo AP 
S555 Bisice Gaersr oocowo ooizis E28: afte #APTCSUP, SENVM i C SSED 
3840 917204 001003 BNE :YES, SKIP TYPE OUT 
3841 017206 112046 2s MOVB —« (RO) +, -( SP) R 10 BE TYPED ONTO STACK 
se4e 017210 001005 BNE 4s use 1 Sat isn RMINATOR 
3843 01721 726 ST (SP )+ LIF ERNINATOR POR IT OFE THE STACK 
17214 O1 60S: MOV (SP)+,R9 $3 0F tenets 
3845 017216 Obe71 00002 3S: a00 #2, (SP) ; #ADTUST RETURN PC 
Seu? 19584 SSS9TE D001! us: CMPB Os BHT, (SP) BRANCH IF <HT> 
3848 017230 001430 BEQ 
3849 17232 122716 00200 MPB CRLF, (SP) ;;BRANCH IF NOT <CRLF> 
3851 017240 O05 TST (SP )+ ;;POP <CR><LF> EQUIV 
385¢ Ol7e42 104401 TYPE TYPE A CR AND LF 
3624 issue Toeh5e SCRLF 
3654 O17246 106037 017402 R SCHARCNT ; CLEAR CHARACTER COUNT 
3855 017252 000755 BR 2g GET NEXT CHARACTER 
3856 017264 904737 017236 Ss: SR BC, $TYPEC $60 TYPE THIS CHARACTER 


DOS 
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DVMnCA.P11 TYPE ROUTINE 
7 017260 123726 o011S6 65: CMPB 3s SILL, (SP )¢ :;1S IT TIME FOR FILLER CHARS.” 
3855 BiSSeS «467556 BNE 2$ TD ee ee T Next CHAR 
3859 Ci7e66 013746 001154 MOV SNULL,- (SP) :iGET 8 OF FILLER CHAR aoe NEEDED 
0000 7S: ) $3 A NUL TO BE TYP 
3563 617876 002776 ” . af Ew | OEE A Te NBSD The hull SPF oF stack 
Siam teed B17aRS det, SEGARA FBR SCE coum 
* 7 $3 © 
ee 8305 «bBa885 (F” BE $§ + OB oP 
Z :HORIZONTAL TAB PROCESSOR 
3869 017312 112716 o00040 gS: MOVB ; REPLACE TAB WITH SPACE 
? 9s: Po. $ty HH A 
3671 617383 536 Bhaaa®  orryoe bie i: $ ARS tL ORARCH TF NST aT 
3695 173 137 rer (SP)4 SCOP SPACE OFF stack 
ss 
3874 pies 0007 & as REXT CHARACTER 
3875 017336 105777 161606 STYpEC: TSTB aSTPS :IWAIT UNTIL PRINTER IS READY 
36 B17 1Pee 9002 161600 eove 5 oP S astee ;LOAD CHAR TO ae TYPED INTO DATA REG 
3656 O17 1ae5Ze ateeyt 000Ge CMPB ack, 2tspP) iis CHARACTER A CARRIAGE RETURN? 
3860 Bie 3e8 052899 017402 eNee : HARCNT i ORONCE, dar CHARACTER COUNT 
, 615356 TSo7ee cooo1e pooo0e 1S Bree sur tsp) ss ERIE TER A LINE FEED? 
3665 Bi23e 14 P Q siyeex BRANCH iF YES 
3884 017400 i0S227 INCB (PC )¢ :COUNT THE CHARACTER 
3885 017402 000000 SCHARCNT: .WORD O + EHBRACTER COUNT STORAGE 
3886 017404 000207 STYPEX: RTS PC 
3888 .SBTTL APT COMMUNICATIONS ROUTINE 
3890 ore vn st STFLO  ccTO REPORT FATAL ERROR 
3891 017406 112737 000001 o176S52 §$ATY1: Move #1,SFFLG ;10 REPORT FaTaL ERROR 
383¢ 017414 118737 O0000i OISbe5 Satya: Move 81, SHFL LG iO TYPE A MESSAGE 
3634 b174e4 112737 000001 017652 satvy: Move #1,SFFLG ;;TO ONLY REPORT FATAL ERROR 
3896 017432 oO10046 “MOV RO,-(SP) ; ; PUSH RO ON STACK 
3897 017434 010146 MOV R1’-(SP) ;;PUSH R1_ON STACK 
3838 017436 105737 017650 1518 SHFLG 1 SHOULD TYPE A MESSAGE” 
3300 O17444 120737 000001 001214 cHPB BAPTENV, SENV ; | OPERATING UNDER APT? 
330¢ Oi 7464 132737 000100 oo1215 BiTe SAPTSPOOL,, ,SENVM 5} SHOULD SPOOL MESSAGES” 
3904 017464 017600 oDD0004 MOV 34( SP). RO ::GET nESSAGE ‘ 
90S 017470 O62766 O00002 ooD0004 ADD #2. 4(SP) BUMP RETURN ADDR 
906 017476 005737 OO1i74 1S: TST snSGTYPE ::SEE IF DONe W7 LAST XMISSION? 
3907 017502 001375 BNE 1g !:IF NOT: WAIT 
3908 017504 010037 oD01210 MOV RO, SMSGAD : BUT ADOR IN MAILBOX 
3909 017510 105720 2s: TSTB CRO) + FIND END OF MESSAGE 
3919 017512 001376 BNE 2s 
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PoRSaae EEN poRRRe 
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ee 
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DibDb 
ta tai 
Oe £uen 
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T COMMUNICATIONS ROUTINE 


? 210 S MSGAD, RO 38 START MESSAGE 
Pe cosas en POE es otc ON ta 
1 121 Vv ; 33 
2737 erate 001174 nov a *SMSGTYPE TELL APT TO TAKE M 
43 000004 O17562 3S: MOV 34 (SP) 4§ — ort ADOR IN JSR LINKAGE 
oo0002 900004 ADD 4( SP) BUMP RETURN ADDRESS 
3746 177776 MOV 177 9776. -( SP) > ;PUSH & ON STACK 
737 017124 JSR Tope >; CALL ne "Paco 
38: WORD O 
95737 017652 ids: ist8 SEELG 5: SHOULD REPORT FATAL ERROR? 
eeeetd 001214 TST SENV Hi alin UNDER APT? 
1413 ar) jes :IF NOT: 6R 
737 001174 1iS: ST MSGTYPE :F INISHED LAST MESSAGE? 
1375 BNE il itt NOT: WAIT 
7637 000004 001176 MOV o4( SP) SFATAL ::GET ERROR # 
062766 oooc0d2e 9000004 ADD SP) :- BUMP RETURN ADDR. 
0052 001174 INC Hi CTYPE +: TELL abt To TAKE ERROR 
105037 0176Se2 12$: CLRB FFLG ::CLEAR FAT 
105037 017651 CLRB SLFLG >:CLEAR LO 
105037 017650 CLRE SMFLG ::CLEAR MESSAGE FLAG 
2601 MOV (SP)+,R1 ::POP STACK INTO Ri 
012600 MOV (5P)4+/RO :3POP STACK INTO RO 
006207 RTS PC :; RETURN 
S$MFLG: .BYTE 8) ° ;MESSG. FLAG 
000 SLFLG: .BYTE OO :LOG FL 
000 SFFLG: .BYTE OG tT FATAL FLAG 
017654 EVEN 
0200 APTSIZE= 
oo000ci TENV=001 
000100 APTSPOOL=100 
00204C APTCSUP=040 
.SBTTL POWER DOWN AND UP ROUTINES 
= SESRSSEREKREESAASSERASESRAAAKSREKEKSSSRERSSSESS SSS SSSA FH +H APH He 
OWER DOWN ROUTINE 
012737 020014 ocoD024 jPOuER MOV @SILLUP,JePWRVEC ; ,SET FOR FAST UP 
012737 000340 o000ce MOV 8340 DBPWRVEC+2 ; ;PRIO 
010046 MOV -tsp) $3 PUSH *Ro ON STACK 
010146 MOV Rot cep) ::PUSH R1 ON STACK 
010246 MOV Re: -( SP) ::PUSH Re ON STACK 
010346 MOV R3,-\ SP) :;PUSH R3 ON STACK 
010446 MOV RY’ -(SP) 3 RY ON STACK 
Cio0s46 MOV RS’ -(5P) ::PUSH RS ON STACK 
017746 161230 MOV ashe -(SP) ::PUSH JSWR ON STACK 
010637 O20020 MOV SSAVRE ::SAVE SP 
012737 017726 oo0024 MOV SSPRRUP SePURVEC :;SET UP VECTOR 
009000 HALT 
000776 BR .-2 ;;HANG UP 


FSSSSSSASESSESSSSSSSSSSSSSSSASSEESSSAHEASASSHRSSS SHAS HF PSL SASRABRS 
BOWER | UP ROUTINE 
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0014 
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i61i62 


BLS 


047520 


O202e0& 
cooco4 
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oocdes 


oo0de4 
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042527 
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SPWRMG: 
SILLUP: 


SSAVRE: 
SPOWER: 


IOTRD: 


i$: 


27-DEC-77 09:32 PAGE 78 cad 
DOWN AND UF ROUTINES : 


SPWRUP: 


FOS 


EG 00% 
MOV sSILLUP, aPWRVEC :ASETLE FOR FAST DOWN 

MOV SAVRE 

CLR SAV ne. § tt WAIT LOOP FOR THE TTY 

ie _— 119e, WOR FOR THE INC 

MOV (384, WR >; POP NTO aSWR 

MOV ( pS Re ; ;POP aT Ack NTO a2 

MOV (5P)+°R4 : POP TACK NTO RY 

MOV (SP )4°R3 ::POP STACK INTO R3 
MOV (5P)+'Re ::POP STACK INTO Re 

MOV (SP)+,R1 ;;POP STACK INTO R 

MOV (5P)+'RO i ;POP. TACK INTO R ’ 

MOV sSPWRON, 2 VEC i pget THE POWER DOWN VECTOR 

MOV sub oePuRVECss ; 0: 

TYPE [REPORT THE POWER FHILURE 

giHoRD SPOWER :;POWER FAIL MESSAGE POI! .ER 

HAL T i; THE POWER UP SEQUENCE WAS STARTEC 
BF .-2 :: BEFORE THE POKER DOWN WAS COMPLETE 
0 ::PUT THE SP HERE 

-ASCIZ <15><12)>“POWER™ 

- EVEN 

* STHIS ROUTINE WILL PROTECT THE PROGRAM 

; #FROM INTERUPTS (BAD ONES 


: THE TRAP ae IS SET UP FOR 
z 38R PC,RO 


: SILLEGAL INTERRUPTS OR INTERRUPTS fe THE wy VECTOR 
;*#GOTO THE VECTOR AND PCITK UP THE “.+2”" AS AN ADDRESS 


;#AND "4700" AS NEW STATUS. he 
iSTHE 92,85 A PC WILL CAUSE EXECUTION OF THE ©JSRPC.RO™ (AN ILLEGAL INSTR. 
:#AND TRAP TO LOCATION "4". IN LOCATION 4 WE HAVE A 

OTP TTHIS CONDITION CAUSES A TRAP 70 LOC. 4. 
;#WE WILL REPORT IT IN THE SAME MANNER THAT WER WOULD 
#REPORT ANY OTHER ERROR. 
;#1F A BUSS ERROR TRAP DID OCCUT AND CAUSE A TRAP TO 4 


:#WE WILL H 
MOV (6) TRTO ;GET WHERE WE CAME TO. 
SUB #4, TRT :FORM READ ADDR 
CMP TRTO, #1000 ;DID TRAP FROM LESS THAN ADDR. 10007 
BLE 2s :NO-CONTINUE . 
HALT A BUSS ERROR TIME OUT TRAP BROUGHT US HERE. 
ADDRESS CONTAINED IN TRTO. 
BP 1$ ;DGN’T ALLOW CONTINUE. 


GO8 
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DVMNCA.F Li POWER DOWN ant UP ROUTINES 


Geooebo 016637 o00004% O20ei0 2s: MOV 4.6), TREFRO : GET sea FROM ADDR. 
020066 062706 O00004 ADD #4. st “ADD #4 TO STACK POINTES. 


ge007s re oooo4#4 9011Ce gree "alate ib “7 Mg ne B Tag's” 


:; SSSSSSSSSSSSSSSSSSISSSSS > ERROR Si conpsenessenseemuneeneanaeaila 


O20ide id4CO4 ERROR 4 ; ERROR! PETG RONG INTE OR OR 
; INTERRUP 


ete NO Sseraal ety i STOER TEST. 
cele AY UeheensST ESS 0 


I “€ QEvICE UNOEP TES”. 
TERRUPT 


INTERRUPT 
URING THE INTERRUPT 
NOT 
:FQR THIS ERROR - oer TU 


SE xPECT ae fue TION. neuer TEST TO 
pia es id THAT THE DEVICE DIDN'T 


NTERRU 
OLLOW Tue RECOMMENDED PROCEEDURE 


;_IN THE DOCUMENT Lore THIS DIAGNOSTIC) 
;FOR LOOPING ON TEST 


; ; SSSSSSSSSSSSSSSSSESSESSSESS> © ERROR <<  S$STSSTSSISSSSSSTSSSSESISSSESTSE 


001404 3$: 


veeti vecte 
we, VECTP 
vetT1 vECTe 


oOo oO oO000 

MUM MUMMUMrUUN 

OONONOVOOQOO000000) 
stststat=tst=tetats 
= bs 
SLELLLCL££ Sr 
--—-OO00000C 
oOoeTe £ tvs 


160700 JMP :START TESt OVER AGAIN 
oo0000 TPTC: . WORD G ;CONTAINS ADOR. WE TRAPPED OR INTERRUPTEC 





HOS 
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DVMNCA. PLL POWER DOWN AND UF ROUTINES “£4 0098 
407 0 90000¢ TRERO: RD CONTAINS ADOR. WE TRAPPED OF INTs. FeOM. 
apes — 6 TeEee?  tHOE nec Ber 
467 
4076 iSTAES "Routine icy Pickue. THe COMER BVTE OF THE “TRAPS Tye TRUC tie Op 
wore : STHIS ROU WIL KU L “TRAP™ TION 
45> iNE Tbe GhRousH THE TRAP TABL STARTING BOSRESS 
40° SIRED ROUTINE. THEN USING THE AO RESS obTA T WILL 
+See 385 Tot Rae R 
4083 be0ei4 Gieece a00002 STRAP: fioy Bt SP) -RO BYE TRAP ADDRESS 
Se ee A nt 9 Cs 
40 pessq 300 ASL Ro + oe eI SN 6 FOR RINDEXING 
uoB? Oe0es6 018000 o20e46 MOV STRPAD(RO) .RO ; INDEX 70 TABL 
40BB Oedesé 000200 RTS 0 i 3 UNO ROUTINE. 
4096 
4031 +:THIS IS USE TO HANDLE THE “GETPRI™ MACRO 
4033 C20234 O11646 STRAP2: MOV (SP). -(SP) ::MOVE THE BC DOWN 
4094 20236 Ole6666 000004 ocDD002 MOV 4ursps 2cSP) tIMOVE THE PSW_ DOWN 
4095 Oece¥s O00dde RTI i RESTORE THE PSi 
4097 “SBTTL TRAP TABLE 
4099 L#THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
4190 ieBY THE “TRAP” INSTRUCTION. 
4102 ROUTINE 
153 pees 8 020234 $TRPAD: .WOR STRAP2 
41 Geso 17124 giver ss CALL=TVPE TRAP+1(104401) TTY TYPEOUT ROUTINE . 
410 Qe0s6e Dise46 TyeGe iiGALL=TvpOC — TRAPea(iGNWGe) TYPE OCTAL NUMBER (WITH LEADING ZEROS 
4] 12522 TYP ALreTYPOS -« TRAP*3( 104403) TYPE OCTAL NUMBER (NO LEADING 2ER DS) 
4108 O20256 O152be STYpON ~iCALL=TYPON  TRAP+4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
4103 Geceed 18450 $TYPBN : CALL = TYPBN - TRAP#5(10440S) TYPE BINARY (ASCII) NUMBER 
mt ig O2026e 016420 SGTSWR ;;CALL=GTSWR TRAP+6(104406) GET SOFT-SWR SETTING 
4113 o20z64 916350 SCKSHR ;;CALL=CKSWR © TRAB+7( 104407) TEST FOR CHANGE IN SOFT-SuR 
R 33 = + 4Yy ) y¥ TY UT ih 

atid BSRSS8 BieSes #8 ch GALL ERBC TN LIN TRapst oi tBgg4?} TT TYPEIN & SHRINE "B59 the 
4116 O20272 OOSO1IS O46102 041517 Emi:  .ASCIZ %15)<12>/CLOCK SR FUNCTION ERROR, 
41? a1 1123 943040 
Stig SoBe Bette BEriBe Bibess 
4131 OB03e9 GOSOIE 046103 041517 

M1S17 EM2:  .ASCIZ <15><12>/CLOCK SR DATA ERROR’ 
4i2 Ge0332 20113 Osi123 O42040 Kg 
BESS Blot Siler rts 
iS Se OOS81s O46103 O41S17 EM3:  .ASCIZ “«15)°12)-CLOCK BR DATA ERROR, 
413— 520365 020113 OSlidz o42040 viet " 


a 
FROM ADDR.«8 


ERROF 
CLOCK ADOR. s 


TO 
ASR 
ASR 


“COUNT REG. 
‘12> eCLOCk INTERRUPT ERROR 


‘12> @REPEATABILITY ERROR # 


l2>sCOUNT ERROR #8 


a 

oO 
a 
e 

tal 
~ 

Qa. 
@ 
« 
uJ 
- 
o- 
. 


(12> 8ERRPC 


} 


»><«12> ADDRESSING ERRORS 
‘12> 8ERRPC 
#ERRPC 


‘ 2 ‘ 


PAGE Si 
©15>¢12) @eCOUNT FUNCTION ERROF®s 


(15><12)@ERRPC ASR 
<15><12>@ERRPC ABR 


«15><«le> 
«200° sERRPC 


‘200° 
«1S> 
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iS 
«15 
«1S> 
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09: 32 
.AScil 
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.ASCIZ 
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ASCIZ 
asciz 
-ASCIZ 
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TRAP TABLE 
927122 900 
30461 WRANMI: ASCII «200)"MOi;-OvMNC-A" 
ov20s gueese Sateeé ; : 
Os0206 ove514 051501 (ASCII (200 “PLEASE PULL OUT ST SWITCHES AND THEN TUR.” 
1 ii4 
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ie Bie pas 
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209 42519 920115 LASCIZ <200:“THEM COMPLETELY CW OR CCW" 200) °7 
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G20ie7 051117 Owiwus 
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021142 EVEN 
001116 O0G1376 001126 DT1:  .WORD SERRPC,ASR,$BDDAT,$GONAT,O 
901124 900000 
QO111g 901400 001126 OTS: WORD SERRPC, ABR, SBODAT, $GDDAT, 0 
001116 020206 020210 DT¥:  .WORD SERrPC,TRTO,TRFRO,O 
001116 001376 O00000 DT12: .WORD SERrPC,.ASR,O 
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001116 001424 00000 DT26: .WORD SERRPC,$TMpo,0 
900090 o0c000 DFO: .WORD 0,0 
00000: END 
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